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1.0 ABSTRACT 



THE 2K TO 32K P0P-8A PROCESSOR EXERCISER IS A PROGRAM TO 
CHECK THE EXECUTION OF MEMORY REFERENCE INSTRUCTIONS AND 
OPERATE INSTRUCTIONS! IN A 2K TO 32K PDP-8A COMPUTER, THE 
PROGRAM ALSO CHECKS FOR DATA TRANSMISSIONS, AND INTERRUPTS IF 
A OPTIONS 1 MODULE (M8316) IS CONNECTED IN LOOP BACK MODE 
AND THE PROGRAM IS INITIALIZED TO TEST THE OPTION 1 MODULE , 
ALL INSTRUCTIONS, ADDRESSES i MEMORY DATA, AC DATA, MQ DATA AND 
LINK DATA ARE GENERATED FROM A RANDOM NUMBER GENERATOR. 

THE PROGRAM RELOCATES ITSELF A PAGE AT A TIME, UP AND DOWN, 
WITHIN ANY 2K TO *K MEMORY FIELD , IF THE COMPUTER CONTAINS 

MORE THAN 4K of memory, the program will RELOCATE up and 

DOWN BETWEEN MEMORY FIELDS, AT LEAST 2K OF MEMORY IS REQUIRED 

IN THE LAST EXTENDED MEMORY FIELD FOR THE PROGRAM TO RELOCATE 
INTO IT, 

THE PROGRAM CAN ALSO BE RUN ON THE P0P-8A APT TEST LINE, 



2.0 REQUIREMENTS 

B — ••"■••■•Jll 

2.1 HARDWARE 



THE FOLLOWING HARDWARE IS REQUIRED FOR THE EXECUTION OF THIS 
PROGRAM, 



PROCESSOR ( S ) I 
MEMORY I 

OPTIONSI 



PDP-8A/E/F/M 

2K OF MEMORY TO 32K OF MEMORY IN ANY 
INCREMENTS OF IK. 

IF GREATER THAN 4K OF MEMORY, A M837 OR 

M8317 MODULE (MEMORY EXTENS I ON/T I ME SHARE CONTROL ) 

IS REQUIRED, 

IF DATA TRANSMISSIONS AND INTERRUPTS ARE TO BE 
TESTED, A PDP-8A OPTION BOARD #1 (M8316) 
IS REQUIRED {PDP-8A ONLY). 



SPECIALI IF A PDP-8A OPTION BOARD #1 IS TO BE TESTED, 

THE FOLLOWING HARDWARE IS REQUIRED s 
A i ONE QUAD EXTENDER MODULE 

B. ONE BC38R-01 CABLE 

C. ONE E I A TEST CONNECTOR (OPTIONAL) 

D. THREE TERMI-PQINT JUMPERS. 



2.2 STORAGE 

* WW--** 



THE PROGRAM INITIALLY OCCUPIES LOCATIONS 0000 TO 0155 AND 
0200 TO 3722. LOCATIONS 0156 TO 0176 ARE RESERVED FQR THE 
RIM LOADER ON COMPUTERS CONTAINING LESS THAN 4K OF MEMORY, 
THE PROGRAM USES LOCATIONS 0000 TQ 0155 AND 3600 TO 3722 
FOR PROGRAM INITIALIZATION, ONCE THE PROGRAM HAS BEEN STARTED, 
THESE LOCATIONS AND THE LOCATIONS RESERVED FOR THE RIM LOADER 
WILL BE DESTROYED. ALL LOCATIONS OUTSIDE THE PROGRAM AREA 



» 



IN THE PROGRAM FIELD AND AMY OTHER FlELDi IF SELECTED. ARE 
USED AS A TEST AREA, THE TEST AREA IS INITIALLY FILLED WITH 
HALTS AND REFILLED AFTER EVERY 4096 TEST INSTRUCTIONS HAVE 
BEEN EXECUTED. IF THE PROGRAM IS ALLOWED TO RELOCATE* IT 
WILL RELOCATE UP AND BACK WITHIN A 2K TO 4K MEMORY FIELD 
AND UP AND DOWN BETWEEN MEMORY FIELD I F MORE THAN 4K, 



2.3 PREREQUISITE SOFTWARE 



PDP-8A CPU TEST 
PDP-8A MEMORY TESTS 

KM3-A OPTION TEST #2 - IF ?DP-8A OPTION BOARD #2 IN SYSTEM 
0KC8-AA OPTION TEST *% • I? PDP-8A OPTION BOARD #1 IN SYSTEM 

3.0 RESTRICTIONS 



3.1 HARDWARE RESTRICTIONS 



A. MINIMUM OF 2K OF MEMORY TO A MAXIMUM OP 32K OF MEMORY 

B. if A PDP-8A OPTION BOARD #1 IS TO BE USED WITH THE 
PROGRAM, THE OPTION BOARD MUST BE CONNECTED IN 
LOOP BACK FOR THE 12 BIT PARALLEL I/O AND THE 
SERIAL LINE UNIT, 

3.2 SOFTWARE RESTRICTIONS 



ALL THE SOFTWARE RESTRICTIONS LISTED BELOW PLUS FIELD 
AND MEMORY SIZE MUST BE ADHERED TO, OTHERWISE, THERE 
IS NO GUARANTY WHAT WILL HAPPEN TO THE PROGRAM, 



a. once the program has been started. the program 
loader (s) will be destroyed, 

b . once the program has been started and it was initialized, 
to run with or without the hardware front panel 

switch register* the program can not be re- 1 n i t i al i zed 
unless the program is reloaded. 

c. before each program start, location 0021 in the program 
field must be initialized for the amount of memory 

to be tested, location 0021 initially is preset to 0001 
(no front panel switch register and 2k of memory), 

d. once the program has relocated into another memory 
area, and it is desired to change memory size, 
memory size cannot be decreased below the ik 
segment that the program is located in, 

e. if the front panel switch register was selected* always 
stop the program by setting the switch register to 
0400. This is done to insure that the program 

is not in the process of relocating, for those 
systems without a front panel i it is best to 
reload the program, 



F. IP THE PROGRAM WAS INITIALIZED ^'fo ANY 3K FIELD, THE 
PROGRAM SHOULD ALSO BE RUN AT 2K. THE REASON FOR THIS 
IS THAT IN ANY 3K MEMORY FIELD, ADDRESSES 2000'TO 
3777 WILL NOT BE TESTED « 

4,0 STANDARD TEST PROCEDURE 



IF THE P0P»8A OPTION BOARD #1 IS TO BE USED IN CONJUNCTION 
WITH THE PROGRAM DO STEP A BELOW, OTHERWISE GO TO STEP B, 

A. DO THE FOLLOWING STEPS FOR THE INITIAL HARDWARE SETUP OF 
THE PDP-8A OPTION BOARD #%l 

1. TURN THE AC POWER OFF ON THE COMPUTER 

2. UNPLUG THE PDP*8 A OPTION BOARD #1 (M8316) FROM THE COMPUTER 

3. PLUG THE QUAD EXTENDER INTO THE SLOT THE M8316 OCCUPIED 

4. CONNECT BERG SOCKETS J4 AND J5 ON THE M8316 MODULE 
IN PARALLEL USING THE BCO8R-01 CABLE, IN CABLING 
THE BCO8R-01 CABLE, MAKE SURE THAT THE LETTERING 
IS FACING UPWARDS ON ONE END OF THE CABLE AND 
DOWNWARDS ON THE OTHER END. 

5. SET ALL THE SWITCHES ON THE M8316 MODULE TO THE OFF POSITION, 
AND THEN SET Sl-5, Sl-6# AND Sl-8 TO THE ON POSITION, 

6. PLUG THE M8316 MODULE INTO THE QUAD EXTENDER. 

7. TURN THE AC POWER 3ACK ON TO THE COMPUTER, 

8. GO TO STEP B, 

B, IF THE COMPUTER CONTAINS AT LEAST 4K OF MEMORY, LOAD 
THE PAPER TAPEi MA I NDES-08-D JEXB-A-PB , USING THE 
STANDARD BINARY LOADER TECHNIQUE AND THEN GO TO 
STEP D, IF THE COMPUTER CONTAINS LESS THAN 4K 

OF MEMORY, DEPOSIT ThE APPROPIATE RIM LOADER INTO 
THE LOCATIONS LISTED BELOW IN FIELD 0, 



LOCATION 


LOW SPEED RIM 


HIGH 


0156 


6032 


6014 


0157 


6031 


6011 


0160 


5357 


5357 


0161 


6036 


6016 


0162 


7106 


7106 


0163 


7026 


7006 


01 6 A 


7510 


7510 


0165 


5357 


5374 


0166 


7006 


7006 


0167 


6031 


6011 


0170 


5367 


5367 


0171 


6034 


6016 


0172 


7420 


7420 


0173 


3776 


3776 


0174 


3376 


3376 


0175 


5356 


5357 



C, PLACE THE PAPER TAPE, MA I NDEC-08-D JEXB-A-PM , INTO THE 
DESIRED READER, "LOAD ADDRESS" TO 0156, PRESS I N I T " 
AND THEN "RUN" , WHEN THE TAPE HAS BEEN LOADED, HALT 
THE COMPUTER AND GO TO THE NEXT STEP, 



* 



D, IF THE PDP-8A OPTION BOARD #1/IS TO BE USED IN CONJUNCTION 
WITH THE PROGRAM* DO THE ITEMS LISTED 3EL0W. IF THE 
PDP-8A OPTION BOARD #1 IS NOT USEDi GO TO PARAGRAPH 4,2, 
RUN PDP-8A PROCESSOR EXERCISER. 

1, WITHOUT TURNING POWER OFF ON COMPUTERS CONTAINING 
RAM MEMORY i TURN OFF THE TELETYPE AND UNPLUG THE 
TELETYPE CABLE FROM THE J3 BERG SOCKET ON THE M8316 
MODULE IF CONNECTED, 

2, NOW USING THE TERM I «PQ I NT JUMPERS, JUMPER THE 
APPROPIATE PINS ON THE J3 BERG SOCKET ON THE 
M8316 MODULE TO THE DESIRED LOOP BACK LISTED BELOW, 

A i E I A LOOP BACK • PIN F TO PIN J AND PIN E TO PIN M 
OR USE THE E I A TEST CONNECTOR IF AVAILABLE. 

8 , 20MA LOOP BACK - PIN E TO PIN H, PIN K TO PIN KK, 
AND PIN S TO PIN A A • 

3, GO TO PARAGRAPH 4,2, RUN PDP-8A PROCESSOR EXERCISER 

CHANGING IOT CODES 



NOT APPLICABLE 

RUN PDP-8A PROCESSOR EXERCISER 



THE PROGRAM MUST "ALWAYS" 3E INITIALIZED AT ANY PROGRAM RESTART, 
ONCE THE PROGRAM IS INITIALIZED TO RUN WITH OR WITHOUT THE HARDWARE 
FRONT PANEL SWITCH REGISTER, IT CANNOT BE REINITIALIZED AGAIN 
UNLESS THE PROGRAM IS RELOADED, 

IN ORDER TO FIND, INITIALISE* START AND STOP THE PROGRAM DO THE 
FOLLOWING STEPS , 

A. IP THE PROGRAM WAS JUST LOADED, THE PROGRAM WILL RESIDE 
IN THE FIRST 2K OF FIELD AND THE STARTING ADDRESS 
WILL BE 0200. IF THIS tfAS THE CASE GO TO STEP B TO 
INITIALIZE THE PROGRAM, TO FIND THE PROGRAM AND 
STARTING ADDRESS OF THE PROGRAM, ONCE THE PROGRAM 

HAS BEEN STARTED, DO THE FOLLOWING STEPS. 

1. LOAD EXTENDED ADDRESS TO FIELD 

2. LOAD ADDRESS TO ADDRESS 0005 AND EXAMINE THAT LOCATION 

3. THE CONTENTS OF LOCATION 0005 WILL CONTAIN THE 
STARTING ADDRESS OF THE PROGRAM AND THE FIELD 
THAT THE PROGRAM IS LOCATED IN, THE CONTENTS OF 
ADDRESS 0005 WILL 3E IN THE FOLLOWING FORMAT SAF0 , 
SA EQUALS THE MOST SIGNIFICANT SIX BITS OF THE 
STARTING ADDRESS, F EQUALS THE FIELD THAT THE PROGRAM 
IS LOCATED IN, SA0Z WILL BE THE NEW STARTING ADDRESS 
OF THE PROGRAM 

4. LOAD THE INSTRUCTION AND DATA FIELD TO THE F J ELD 
THAT THE PROGRAM IS LOCATED IN (OBTAINED FRQM 
STEP 3 ABOVE), 

5'. GO TO STEP S TO INITIALIZE THE PROGRAM 

B , THE PROGRAM WHEN FIRST LOADED IS INITIALIZED TO THE 
FOLLOWING CONDITIONS,- NO HARDWARE FRONT PANEL SWITCH 
REGISTER, NO PDP-8A OPTION BOARD #1 TESTING, AND MEMORY 
SIZE OF 2K. TO CHANGE THE INITIAL CONFIGURATION OR IF 
THE PROGRAM IS TO BE RESTARTED , LOAD ADDRESS TO 0021 



IN THE PROGRAM FIELD. MOW DEPOSIT INTO THIS LOCATION 
THE HARDWARE CONFIGURATION AND MEMORY SIZE TO BE TESTED 
FROM THE TABLES BELOW » 

HARDWARE CONFIGURATION BITS AND 1 - LOCATION 0021 



BIT 0=0 USE LOCATION 0220 AS A PSEUDO SWITCH REGISTER 

BiT 0=1 USE THE HARDWARE FRONT PANEL SWITCH REGISTER 

Bl T 1=0 DO NOT TEST THE PDP*8A OPTION BOARD #1 

BIT 1=1 TEST THE PDP-8A OPTION BOARD #1 

MEMORY. SI2E « BITS 7*11 * LOCATION 0021 



MEMORY LOC 21 MEMORY LOC 21 MEMORY LOC 21 MEMORY LOG 21 



IK 


N/A 


9K 


0310 


17K 


0020 


25K 


0030 


2K 


0001 


10K 


0011 


18K 


0021 


26K 


0031 


*3K 


0002 


#UK 


0012 


*19K 


0022 


»27K 


0032 


4K 


0003 


12K 


0213 


20K 


0023 


28K 


0033 


5K 


0004 


13K 


0014 


21K 


0024 


29K 


0034 


6K 


0005 


14K 


0015 


22K 


0029 


30K 


0035 


*7K 


0006 


«15K 


001$ 


«23K 




«31K 


0036 


8K 


0007 


16K 


0017 


24K 


0027 


32K 


0037 



•REFER To STEP F IN SOFTWARE RESTRICTIONS, PARAGRAPH 3,2, 

IF BIT OF LOCATION 0221 WAS SET TO A 0, -LOAD 
ADDRESS TO LOCATION 0020 AND DEPOSIT INTO THIS 
LOCATION THE SWITCH REGISTER SETTING DESIRED 
(NORMALLY ALL ZEROES) , 

C. TO START THE PROGRAM LOAD ADDRESS TO THE ADDRESS OBTAINED 
IN STEP A ABOVE, SET THE SWITCH REGISTER TO THE DESIRED 
SWITCH SETTING < NORMALLY ZEROES), NOW PRESS "INIT" AND ... 
THEN "RUN" , THE PROGRAM SHOULD NOW RUN, 

0. TO STOP THE PROGRAM "ALWAYS" SET THE SWITCH REGISTER 
OR PSEUDO SWITCH REGISTER WHICHEVER SELECTED TO 0400, 
FAILURE TO DO THIS MAY DESTROY THE PROGRAM WHEN IT 
IS RESTARTED, THE PROGRAM WILL HALT AFTER 4096 
TEST INSTRUCTIONS HAVE BEEN EXECUTED IF THE 
SWITCH REGISTER WAS SET TO 0400. RESETTING THE 
SWITCH REGISTER AND PRESSING "INIT" AND THEN "RUN" 
WILL CAUSE THE PROGRAM TO CONTINUE TESTING, 

E . THE PROGRAM SHOULD RUN UNTIL STOPPED BY THE OPERATOR , 
IF THE PROGRAM HALTED AND THE SWITCH REGISTER WAS NOT 
SET TO 0400, REFER To THE SECTION ON ERRORS, 

F. RUN THIS PROGRAM FOR 32 MINUTES. A PROGRAM PASS 
w!LL RANGE BETWEEN 3 SECONDS TO 14 SECONDS DEPENDING 
ON MEMORY SIZE AND CYCLE TIME, 

G. TO RESTART THE PROGRAMi DO STEPS A, B AND C, 



♦ 



5,0 



D BY THE 
AN ERROR HALT, REFER TO THE 
DETERMINE IF THE ERROR WaS A 
REFERENCE INSTRUCTION, QPE3AT 
DATA ERROR, PARALLEL I/O DATA 
BATTERY EMPTY, INACTIVE OEVIC 



WILL RESULT IN 
ON ERROR HALTS TO 
FAILURE DUE TO A MEMORY 
E INSTRUCTION, SERIAL LINE UNIT 

ERROR, ILLEGAL INTERRUPT, 
Ei OR A RELOCATION ERROR, 



5,1 



ERROR HALTS 



TO DETERMINE WHAT TYPE OF ERROR WAS DETECTED BY THE 
PROGRAM, REFERENCE THE ERROR HALTS LISTED BELOW AND GO TO 
THE PARAGRAPH DESCRIBING THE ERROR AND FOR THE ERROR RECOVERY , 
ANY ERROR HALTS WHICH OCCUR AND DO NOT CORRESPOND TO ANY 
OF THE ADDRESSES LISTED BELOW, ARE CATASTROPHIC ERRORS, THESE 

3UE TO EXECUTION OF A INSTRUCTION TO THE 
FIELD. THE Hi 



MIR ERR 



SLU D, ERR™ 
P, I/O 0, 
ILL, I NT « 
INACT. DEV 
BAT EMP - 



ROLL UP » 
ROLL DOWN * 
SWAP FIELDS - 



( AND-T AD- I S2» 



SERIAL LINE UNIT DATA ERROR 
12 BIT PARALLEL 



JM< 



INACTIVE DEVICE ERROR 
BATTERY EM'TY 

STARTING ADDRESS AND FIELD PROGRAM IS LOCATED IN 
RELOCATION ERROR WHILE ROLLING UP IN A MEMORY FIELD 
RELOCATION ERROR WHILE ROLLING DOWN IN A MEMORY FIELD 
RELOCATION ERROR DURING RELOCATION TO ANOTHER FIELD 



SAF0 * 




SA IS 
AND F 
FIELD 
SHOULC 


THE STARTING ADDRESS OF 
IS DETERMINED BY THE OPE 
WHICH THE PROGRAM HALTED 
) AGREE WITH ADDRESS 0005 


MR I ERR 


OPR ER 


R SLU D 


ERR P, I/O Q. ERR SAF0 


1337 
1537 
1737 
2137 
2337 
2537 


1742 
2142 
2342 
2542 
2742 
3142 


3213 
3413 
3613 
4313 
4213 
4413 


3251 02F0 
3451 34F0 
3651 06F0 
4051 10F0 
4251 12F0 
4451 14F0 


2737 


3342 


4613 


4651 16F0 
5351 20F0 


3137 
3337 
3537 
3737 


3542 
3742 
4142 
4342 


5013 
5213 
5413 
5613 


5251 22F0 
5451 24F0 
5651 26F0 


4137 
4337 
4537 
4737 
5137 


4542 
4742 
3142 
5S&2 

534 2 


6013 
6313 
6413 
6613 
7013 


6051 30F0 
6251 32F0 
6451 34F0 
6651 36F0 
7051 40F0 


5337 
5537 


5742 
6142 


7 213 

7413 


725i 42F0 
7451 44F0 



FIELD HERO. 



ILL, I NT INACT DEV / BAT EMP SAF0 

3132 3323 3311 02F0 

3332 3523 3511 04F0 
3532 3723 3711 06F0 
3732 4123 4111 10F0 
4132 4323 4311 12F0 
4332 4523 4511 14F0 
4532 4723 4711 16F0 
4732 5123 5111 20F0 
5132 5323 5311 22F0 
5332 5523 5511 24F0 
5532 5723 5711 26F0 
5732 6123 6111 30F0 
6132 6323 6311 32F0 
6332 6523 6511 34F0 
6532 6723 6711 36F0 
6732 7123 7111 40F0 
7132 7323 7311 42F0 
7332 7923 7511 44F0 

RELOCATION ERRORS 

ROLL UP ROLL DOWN SWAP FIELDS SAF0 

0233 3565 0466 N/A 

0433 3765 0666 N/A 

0633 4165 1066 N/A 

1033 4365 1266 N/A 

1233 4565 1466 N/A 

1433 4765 1666 N/A 

1633 5165 2066 N/A 

2@£3 5365 2266 N/A 

2233 5565 2466 N/A 

2433 5765 2666 N/A 

2633 6165 3066 N/A 

3033 6365 3266 N/A 

3233 6565 3466 N/A 

3433 6765 3666 N/A 

3333 7165 4066 N/A 
<v033 7365 4266 N/A 
4233 7565 4466 N/A 
4433 7765 4666 N/A 



« 



5.2 ERROR PRINTOUTS 



MOT APPLICABLE 
3,3 MEMORY REFERENCE INSTRUCTION ERRORS 



THE PROGRAM WILL HALT AT ADDRESS XX37 FOR MEMORY REFERENCE 
INSTRUCTION UND-TAQ- 1 SZ-DCA- JMS- JMP ) ERRORS. XX37 WILL BE 
A COMMON HALT FOR ALL ITEMS LISTED BELOW IN THE TABLE , 
RECORD THE CONTENTS OF THE AC OF THIS HALT INTO THE FIRST 
ITEM IN THE TABLE AND THEN PRESS "RUN" , CONTINUE WITH 
THE SEQUENCE UNTIL EACH ITEM IN THE TABLE BELOW IS FILLED. 

MEMORY REFERENCE INSTRUCTION INFORMATION TABLE 



HALT # ADDRESS CONTENTS OF AC DESCRIPTION 

HALT Ul XX37 FIELD THAT PROGRAM PUT INSTRUCTION IN 



HALT #2 XX37 

HALT #3 XX37 

HALT #4 XX37 

HALT #3 XX37 

HALT #6 XX37 



INSTRUCTION RETURNED FROM THIS 
FIELD AFTER EXECUTION OF INSTRUCTION 



ACTUAL PC RETURN FROM INSTRUCTION 

ADDRESS WHERE INSTRUCTION WAS PLACE 

TEST INSTRUCTION - THE INSTRUCTION 
WHICH WAS EXECUTED 



HALT #7 XX37 



REFERENCE ADDRESS - ADDRESS WHICl 
THE INSTRUCTION WILL REFERENCE, ! 
IF THE INSTRUCTION IS INDIRECT, 
THIS ADDRESS WILL CONTAIN 'TH-E 
INDIRECT ADDRESS , 



HALT #8 XX37 



INDIRECT ADDRESS - THIS I S 
INDIRECT ADDRESS WHICH THE TEST 
INSTRUCTION WILL REFERENCE , N/A 
FOR DIRECT ADDRESSING INSTRUCT!! 



HALT #9 XX37 



HALT #10 XX37 



INITIAL MEMORY DATE - MEMORY 
DATA WHICH IS PUT INTO 
REFERENCE 
ADDRESS IF 
DIRECT OR 



N/A FOR 
NSTRUCTIONS, 



FINAL MEMORY DATA - CONTENTS Or 
REFERENCE ADDRESS OR INDIRECT 
ADDRESS AFTER EXECUTION OF 
INSTRUCTION, FOR A JMP 
INSTRUCTION, THIS NUMBER 
BE EQUAL TO A CIF X, 



« 



H' JMS INSTRUCTION, THIS NUMBER 
SHOULD EQUAL, THE INSTRUCTION 
ADDRESS (HALT #5) PLUS 1, 



HALT #11 XX37 



THE CONTENTS OP THE AC 

BEFORE THE EXECUTION OF THE INSTRUCTION 



HALT #12 XX37 



THE CONTENTS OF THE AC AFTER 

THE EXECUTION OF THE TEST INSTRUCTION 



HALT #13 XX37 



THE STATE OF THE LINK* BEFORE 
THE EXECUTION OF THE INSTRUCTION 



HALT #14 XX37 



THE STATE OF THE LINK, AFTER THE 
EXECUTION OF THE TEST INSTRUCTION, 



HALT #15 XX37 



THE CONTENTS OF THE MQ BEFORE 
THE TEST INSTRUCTION IS EXECUTED 



HALT #16 XX37 



THE CONTENT OF THE MQ AFTER 

THE EXECUTION OF THE TEST INSTRUCTION 



THE IS THE END OF THE MEMORY REFERENCE INSTRUCTION ERROR INFORMATION. 
REFER TO MEMORY REFERENCE TEST INSTRUCTION SETUP SECTION, 
PARAGRAPH 5,4, TO DETERMINE THE TYPE OF ERROR , 

TO LOOP ON THIS ERRORi SET THE SWITCH REGISTER OR 
PSEUDO SWITCH REGISTER WHICHEVER SELECTED TO 7000 AND 
PRESS "INlt" AND THEN "RUN". THE PROGRAM IS NOW IN A 
LOOP, LOOPING ON THE SAME CONDITIONS, 

MEMORY REFERENCE. TEST INSTRUCTION SETUP 



TO DETERMINE THE TYPE OF ERROR » THE OPERATOR MUST UNDERSTAND 
THE TEST INSTRUCTION SETUP, THE TEST INSTRUCTIN SETUPS 
ARE BROKEN UP INTO GROUPS WHICH ARE LISTED AND DESCRIBED 
BELOW , 

l and'S through dca'S direct addressing mode 

1, instruction setup is put in some random field 

2, location 4 of this random field contains the return 
pointer to the program , 

3, the contents of the link, ac and mq contains some random number 

4, the program jumps to the instruction address -£ 
5', instruction address -1 = gif to program field, 

6. instruction address s the test instruction 

7, instruction address *1 s jms 14* return to program 
8', instruction address +2 = jms i 4 *» return to program 

9. reference address * initial memory data - location the instruction) 
will execute, 

8, and's through oca's indirect address mode 

1', instruction setup is put in some random field 

2, location 4 of this field contains the return pointer to the program 

3, the contents of the link, ac, and mq contains some random number 

4, the program jumps to the instruction address «i 

5, instruction address *1 = gif to program field 



6, INSTRUCTION ADDRESS a THE TEST INDIRECT INSTRUCTION 

7, INSTRUCTION ADDRESS + 1 s JMS I 4 - RETURN TO PROGRAM 

8, INSTRUCTION ADDRESS +2 a JMS I 4 - RETURN TO PROGRAM 

9, REFERENCE ADDRESS a INDIRECT ADDRESS - THE ADDRESS THE INSTRUCTION 
WILL REFERENCE 

10, INDIRECT ADDRESS = INITIAL MEMORY DATA - THE LOCATIONS 
THE INSTRUCTION WILL EXECUTE 

JMP'S m DIRECT ADDRESSING MODE 

1. INSTRUCTION SETUP IS PUT IN SOME RANDOM FIELD 

2, LOCATION 4 OF THIS RANDOM FIELD CONTAINS THE RETURN POINTER 
TO THE PROGRAM, 

3". THE CONTENTS OF THE LINK, AC, AND MQ CONTAIN SOME RANDOM NUMBER 

4. THE PROGRAM JUMPS TO THE INSTRUCTION ADDRESS 

5. INSTRUCTION ADDRESS a THE TEST JUMP INSTRUCTION 

6. REFERENCE ADDRESS a CIF TO PROGRAM FIELD, TEST INSTRUCTION 
JUMPS TO HERE 

7.. REFERENCE ADDRESS *1 = JMS I 4 - RETURN TO PROGRAM 
8. REFERENCE ADDRESS *2 = JMS I 4 - RETURN TO PROGRAM 

JMP'S * INDIRECT ADDRESS MODE 

1, INSTRUCTION SETUP IS PUT IN SOME RANDOM FIELD 

2, LOCATIONS 4 OF ThIS RANDOM FIELD CONTAINS THE RETURN POINTER TO THE 
PROGRAM, 

3, THE CONTENTS OF THE LINK, AC ( AND MQ CONTAINS SOME RANDOM NUMBER, 
4", THE PROGRAM JUMPS TO THE INSTRUCTION ADDRESS 

5, INSTRUCTION ADDRESS a THE TEST JMP INDIRECT INSTRUCTION 

6, REFERENCE ADDRESS I CONTAINS THE INDIRECT ADDRESS 

7, INDIRECT ADDRESS a CIF TO PROGRAM FIELD 

8, INDIRECT ADDRESS +1 a JMS I 4 • RETURN TO PROGRAM 

9, INDIRECT ADDRESS +2 a JMS I 4 - RETURN TO PROGRAM 

JMS'S - DIRECT ADDRESS MODE 

1, INSTRUCTION SETUP IS PUT IN SQME RANDOM FIELD 

2. LOCATION 4 OF THIS FIELD CONTAINS THE RETURN POINTER TO THE -PROGRAM , 

3. THE CONTENTS OF THE LINK, AC, AND MO CONTAINS SOME RANDOM NUMBER-, 

4, THE PROGRAM JUMPS TC THE INSTRUCTION ADDRESS 
9. INSTRUCTION ADDRESS a THE TEST JMS INSTRUCTION 

6. REFERENCE ADDRESS » SHOULD CONTAIN INSTRUCTION ADDRESS +1 AFTER 
EXECUTION OF TEST INSTRUCTION 

7. REFERENCE ADDRESS *1 = CIF TO PROGRAM FIELD 

8. REFERENCE ADDRESS +2 * JMS I 4 >■ RETURN TO PROGRAM 

9. REFERENCE ADDRESS +3 = JMS I 4 - RETURN TO PROGRAM 

JMS'S * INDIRECT ADDRESS MODE 

1, INSTRUCTION SETUP IS PUT IN SOME RANDOM FIELD 

2, LOCATION 4 OF THIS FIELD CONTAINS THE RETURN POINTER TO PROGRAM, 

3, THE CONTENTS OF THE LINK, AC AND MQ CONTAINS SOME RANDOM NUMBER , 

4. THE PROGRAM JUMPS TO THE INSTRUCTION ADDRESS 

5, INSTRUCTION ADDRESS a THE TEST JMS INDIRECT INSTRUCTION 

6. REFERENCE ADDRESS a INDIRECT ADDRESS 

7. INDIRECT ADDRESS = SHOULD CONTAINS THE INSTRUCTION ADDRESS +1 
AFTER EXECUTION OF INSTRUCTION 

8. INDIRECT ADDRESS +1 a CIF TO PROGRAM FIELD 

9', INDIRECT ADDRESS *2 a JMS I 4 - RETURN TO PROGRAM 

10. INDIRECT ADDRESS +3 « JMS I 4 - RETURN TO PROGRAM, 



:5,S OPERATE INSTRUCTION ERRORS 

THE PROGRAM WILL HALT AT ADDRESS XX42 FOR ALL OPERATE INSTRUCTION 
ERRORS, XX42 WILL BE A COMMON HALT TOR ALL IDEMS LISTED BELOW 
IN THE TABLE, RECORD THE CONTENTS OF THE AC OF THIS HALT INTO 
THE FIRST IDEM IN THE TABLE AND THEN PRESS "RUN" , CONTINUE 
WITH THIS SEQUENCE UNTIL EACH IDEM IN THE TABLE BELOW IS FILLED. 



OPERATE INSTRUCTION INFORMATION TABLE 



HALT # 

w =>-•• — m 

HALT #1 
HALT #2 

HALT #3 

HALT #4 

HALT #5 

HALT #6 

HALT #7 

HALT #8 



ADDRESS CONTENTS OF AC 

XX42 
XX42 

XX42 
XX42 
XX42 
XX42 
XX42 

XX42 



HALT #9 XX42 



HALT #10 XX42 



HALT #11 XX42 



HALT #12 XX42 



HALT #13 XX42 



HALT #14 XX42 



DESCRIPTION 



field that program put instruction in 

instruction returned from this field 
after execution of instruction 

expected pc return from instruction 

actual pc return from instruction 

address where instruction was placed 

test instruction - the instruction which was executed 

the contents of the ac before the 
instruction was executed 

the simulated results of the ac, 
as calculated by the program, of 
what the ac should be after the 
execution of the test operate instruction 

the contents of the ac after 

the execution of the test instruction-. 

the contents of the link before 
the test operate instruction was 
executed, 

THE SIMULATED RESULTS OF ThE LINK 

after the test instruction was executed 
as calculated by the program 

the content of the link after the 
execution of the test instruction 

the contents of the mq before 

the execution of the test instruction 

the simulated results of the mq, after 
execution of the test operate 
instruction as calculated by the 

PROGRAM, 



HALT #15 



/-THE CONTENTS OF THE HQ AFTER 
THE EXECUTION OF THE TEST INSTRUCTION. 



this is the end of the operate instruction error information, 
errors encountered under this section may be due to the 
execution of the test operate instruction or the simulation 
of test instruction done by the program. refer to paragraph 
3,6 for operate test instruction setup, 

to loop on a operate test instruction error ♦ set the switch 

register or pseudo switch register whichever selected to 7000 

and press " i n i t " and then "run" , the program is now 

in a loop, looping on the same conditions. 

operate test instruction setup 



TO DETERMINE THE TYPE OF ERROR, THE OPERATOR MUST UNDERSTAND 
THE TEST INSTRUCTION SETUP, THE OPERATE TEST INSTRUCTION 
SETUP IS LISTED BELOW. 

A 9 BEFORE THE EXECUTION OF THE TEST OPERATE INSTRUCTION, THE 
PROGRAM SIMULATES THE RESULTS OF THE EXECUTION OF 
THE TEST OPERATE INSTRUCTION UPON THE LINK, AC. AND MQ 

B. THE INSTRUCTION SETUP IS PLACED IN SOME RANDOM FIELD 

C. LOCATION 4 OF THIS RANDOM FIELD CONTAINS THE RETURN 
POINTER TO THE PROGRAM , 

D. THE CONTENTS OF THE LHK, AC AND MQ CONTAINS SOME RANDOM 
NUMBER. 

E. THE PROGRAM JUMPS TO THE INSTRUCTION ADDRESS *1, 

F. INSTRUCTION ADDRESS *X = CIF TO PROGRAM F I ELD 

G. INSTRUCTION ADDRESS c THE TEST OPERATE INSTRUCTION 

H . INSTRUCTION ADDRESS +1 s JMS I 4 - RETURN TO PROGRAM , 

I. INSTRUCTION ADDRESS +2 = JMS I 4 - RETURN TO PROGRAM, 
SERIAL LINE UNIT DATA ERRORS 



THE PROGRAM WILL HALT AT ADDRESS XX13 FOR ALL SERIAL LINE 
UNIT DATA ERRORS, TO FlMD OUT THE WORD THAT WAS 
TRANSMITTED AND THE WORD THAT WAS READ, DO THE FOLLOW I NG » 

A. LOAD ADDRESS TO XX32, WHERE XX IS THE MOST SIGNIFICANT 
SIX BITS OF THE SERIAL LINE UNIT DATA ERROR HALT 
ADDRESS, EXAMPLE - IF THE PROGRAM HALTED AT 3213, LOAD 
ADDRESS TO 3232, 

B. EXAMINE ADDRESS XX32 FDR THE WORD TRANSMITTED 

C. EXAMINE NEXT ADDRESS XX33 FOR THE WORD RECEIVED 



0. If IT IS DESIRED TO LOOP ON THIS DATA p-ATTERN, 

DO THE FOLLOWING STEPS, OTHERWISE. GO TO STEP E TO 
CONTINUE TESTING, 

1'. LOAD ADDRESS TO THE ERROR HALT ADDRESS, CHANGE THE CONTENTS 
OF THIS ADDRESS FROM 7402 TO 7300, 

2. LOAD ADDRESS TO XX21, WHERE XX \S THE MOST SIGNIFICANT 

SIX BITS OF THE SERIAL LINE UNIT DATA ERROR HALT ADDRESS , 
EXAMPLE • IF THE PROGRAM HALTED AT 3213, LOAD ADDRESS TO 3221, 
NOW CHANGE XX21 FROM 3232 TO 7300, 

3'. NOW SUBTRACT 0200 FROM ThE MOST SIGNIFICANT 6 BITS OF THE 
ERROR HALT ADDRESS, USING THE NEW NUMBER AND ADDING 
0045 ONTO IT TO FORM A NEW NUMBER OF XX45, LOAD 
ADDRESS TO XX45, EXAMPLE • IF PROGRAM HALTED AT 3213, 
LOAD ADDRESS TO 3045, NOW CHANGE XX45 FROM 
3753 TO 7300. 

4'. GO TO NEXT STEP E » 

E , TO CONTINUE TESTING OR IF STEPS 1, 2 AND 3 ABOVE WERE DONE 
TO LOOP ON SAME DATA PATTERN , LOAD ADDRESS TO ONE ADDRESS 

MORE THAN THE SERIAL LINE UNIT ERROR HALT ADDRESS { XXl3+l=XX14 > , 
SET THE SWITCH REGISTER OR PSEUDO SWITCH REGISTER, WHICHEVER 
SELECTED, TO 1000 TO INHIBIT PROGRAM RELOCATION, DO NOT 
PRESS " I N I T " BUT PRESS "RUN" . IF STEPS 1* 2 AND 3 ABOVE 
WERE DONE, THE PROGRAM WILL RUN TRANSMITTING THE SAME 
DATA PATTERN AS DETECTED BY THE ERROR, IF THE ABOVE 
STEPS WERE NOT DONEi THE PROGRAM WILL RUN UNTIL 
ANOTHER DATA ERROR IS ENCOUNTERED. 

F. IF IT IS DESIRED TO CHANGE THE CONTENTS OF LOCATIONS LISTED 
IN STEPS 1, 2 AND 3 OF STEP D ABOVE, BACK TO THERE 
ORIGINAL CONTENTS, STOP THE COMPUTER BY SETTING THE 
SWITCH REGISTER TO 1403. NOW DO STEPS 1, 2 AND 3 

IN STEP ABOVE IN REVERSE, BY REPLACING THE 7300'S WJTH 
THE ORIGINAL CONTENTS. NOW GO TO PARAGRAPH 4,2 TO 
RESTART THE PROGRAM, 

5«8 12 BIT PARALLEL I/O DATA ERRORS 

THE PROGRAM WILL HALT AT ADDRESS XX51 FOR ALL 12 BIT PARALLEL I/O 
DATA ERRORS, TO FIND OUT THE WORD THAT WAS TRANSMITTED AND 
THE WORD THAT WAS READ, DO THE FOLLOWING STEPS. 

A, LOAD ADDRESS TO XX34, WHERE XX IS THE MOST SIGNIFICANT SIZ BITS OF THE 
12 BIT PARALLEL I/O DATA ERROR HALT ADDRESS , EXAMPLE - IF THE PROGRAM 
HALTED AT ADDRESS 3251, LOAD ADDRESS TO 3234, 

B. EXAMINE ADDRESS XX34 FOR THE WORD TRANSMITTED 

C. EXAMINE NEXT ADDRESS XX35 FOR THE WORD READ 

D, IF IT IS DESIRED TO LOOP ON THIS DATA PATTERN, DO THE FOLLOWING STEPS , 
OTHERWISE GO TO STEP E TO CONTINUE TESTING, 

1. LOAD ADDRESS TO THE ERROR HALT ADDRESS ( XX51 ) AND CHANGE THE 
CONTENTS FROM 7402 TO 7300, 



2, LOAD ADDRESS TO XX76, WHERE XX l» THE MOST SIGNIFICANT SIX BITS OF 
THE ERROR HALT ADDRESS , EXAMPLE «■ IF PROGRAM HALTED AT 

ADDRESS 3251, LOAD ADDRESS TO 3276, NOW CHANGE THE 
CONTENT OF ADDRESS XX76 FROM 3234 TO 7300, 

3, NOW SUBTRACT 0200 FROM THE MOST SIGNIFICANT SIX BITS OF THE 
ERROR HALT ADDRESS, USING THIS NEW NUMBER AND ADDING 0047 
ONTO IT TO FORM A NEW NUMBER OF XX47, LOAD ADDRESS TO 
XX47. EXAMPLE - IF PROGRAM HALTED AT 3251, LOAD ADDRESS 

TO 3047, NOW CHANGE XX47 FROM 3754 TO 7300. 

4, GO TO NEXT STEP E, 

E. TO CONTINUE TESTING OR IF STEPS 1, 2 AMD 3 WERE DONE ABOVE TO LOOP 
ON SAME DATA PATTERN, .OAD ADDRESS TO ONE ADDRESS MORE ThAN 

THE ERROR HALT ADDRESS ( XX51*1=XX32 ) , SET THE SWITCH REGISTER OR 
PSEUDO SWITCH REGISTERi WHICHEVER SELECTED, TO 1000 TO INHIBIT PROGRAM 
RELOCATION, DO NOT PRESS MNIT" BUT PRESS "RUN", IF STEPS 1, 2 AND 3 
ABOVE WERE DONE i THE PROGRAM WILL RUN TRANSMITTING THE SAME DATA 
PATTERN AS DETECTED BY THE ERROR, IF THE ABOVE STEPS WERE NOT 
DONE, THE PROGRAM WILL RUN UNTIL ANOTHER DATA ERROR IS ENCOUNTERED. 

F , IF IT IS DESIRED TO CHANGE ThE CONTENTS OF LOCATIONS LISTED IN STEPS l, 2 AND 3 
OF STEP D ABOVE, BACK TO THERE ORIGINAL CONTENTS, STOP THE COMPUTER 

BY SETTING THE SWITCH REGISTER TO 1400, NOW DO STEPS 1, 2 ANO 3 IN STEP 
ABOVE IN REVERSE, 8Y REPLACING THE 7300'S WITH THE ORIGINAL CONTENTS , 
NOW GO TO PARAGRAPH 4,2 TO RESTART THE PROGRAM , 

5.9 ILLEGAL INTERRUPT ERRORS 



THE PROGRAM WILL HALT AT ADDRESS XX32 FOR A ILLEGAL INTERRUPT. THIS 

ERROR HALT W.JLL OCCUR IF THE PROGRAM INTERRUPTED WITHOUT ONE 

OF THE FOLLOWING FLAGS BEING SET ON THE PDP-8A OPTION 1 MODULE, 

SLU XMIT/RECEIVE FLAG, PARALLEL I/O DATA READY FLAG, REAL TIME 

CLOCK FLAG, OR AC LOW FLAG, THE ERROR MAY ALSO BE CAUSED 

BY A Flag getting cleared on A INTERRUPT, qr a flag FAILING to 

SKIP IN THE SKIP CHAIN, TO RECOVER FROM THIS ERROR , 

RESTART THE PROGRAM (PARAGRAPH 4,2), IF THE 

ERROR STILL EXISTS, USE A SCOPE TO SEE WHAT OTHER 

FLAG IS SET BESIDES THE FLAGS ON THE PDP-8A OPTION 

BOARD#l MODULE, 

5.10 INACTIVE DEVICE ERROR 



A, THE PROGRAM WILL HALT AT XX23 FOR ANY PDP-8A OPTION 
BOARD n.l INACTIVE DEVICE ERROR, A INACTIVE DEVICE 
ERROR IS DEFINED AS ANY DEVICE (SERIAL LINE UNIT, PARALLEL I/O, 
REAL TIME CLOCK) THAT HAS NOT INTERRUPTED WITHIN A 
GIVEN TIME, TO FIND OUT WHAT DEVICE OR FLAG IS 
INACTIVE DO THE FOLLOWING} 

1. SUBTRACT 100 FROM THE MOST SIGNIFICANT SIX BITS 
OF THE ERROR HALT ADDRESS AND THEN ADD 0026 
ON IT TO FORM A ADDRESS OF XX26, NOW LOAD ADDRESS 
TO THIS NUMBER , THIS NUMBER WILL BE USED IN THE 
NEXT STEP, EXAMPLE - IF THE PROGRAM HALTED 
AT 3323, LOAD ADDRESS TO 3226. 



2. NOW EXAMINE EACH OF THE FOLLOWING ADDRESSES, TO 
FIND OUT WHICH FLAG OR DEVICE IS INACTIVE , A 
LOCATION LISTED BELOW THAT IS SET TO ALL ONES 
IS THE INACTIVE DEVICE 

XX26 m SERIAL LINE UNIT'S TRANSMIT FLAG 
XX27 * SERIAL LINE UNIT'S RECEIVE FLAG 
XX30 , 12 BIT PARALLEL I/O DATA READY FLAG 
XX31 m REAL TIME CLOCK FLAG, 

B. TO RECOVER FROM THIS ERROR » RESTART THE PROGRAM (PARAGRAPH 4,2). 
IF THE PROBLEM STILL EXISTS, USE A SCOPE OR RUN THE 
PDP-8A OPTION TEST #1 PROGRAM. 

5.11 BATTERY EMPTY ERRORS 



THE PROGRAM WILL HALT AT ADDRESS XXll, IF A PDP-8A 
OPTION BOARD #2 IS INSTALLED AND IF THE SIGNAL AC LOW L 
IS LOW AND THE BATTERY EMPTY F/F IS SET, THIS 
ERROR IS CAUSED BY LOSING 3 OWER TO THE COMPUTER, WHICH 
RESULTS IN DRAINING THE BATTERIES, TO RECOVER FROM 
THIS HALT, ALLOW THE BATTERIES TIME TO RECHARGE AND 
THEN RELOAD THE PROGRAM , 

5.12 RELOCATION ERRORS 



ALL ERRORS WHICH ARE ENCOUNTERED BY MOVING THE 
PROGRAM UP OR DOWN IN A MEMORY FIELD OR BETWEEN 
FIELDS ARE CATASTROPHIC AND THE PROGRAM MUST 
BE RELOADED, 

6.0 SWITCH REGISTER SETTINGS 



6.1 NORMAL OPERATING SWITCHES 

SR2 = 1 (1000) * INHIBIT PROGRAM RELOCATION 

SR3=1 (0400) « HALT THE PROGRAM AT THE COMPLETION OF A PROGRAM 
PASS ONLY IF SR1=0 

6.2 ERROR RELATED SWITCHES 



SR0 = 1 (4000) * INHIBIT ERROR HALTS FOR MEMORY REFERENCE OR 
OPERATE ERRORS, 

SR1=1 (2000) - LOOP ON TEST CONDITIONS FOR MEMORY REFERENCE 

OR OPERATE INSTRUCTIONS, 
SR2=1 (1000) m INHIBIT PROGRAM RELOCATION 

7,0 REVISIONS 



FIRST SUBMISSION OF THE PROGRAM 



» 



8,0 PROGRAM DESCRIPTION 



THE 2K TO 32K PDP«8A PROCESSOR EXERCISER CHECKS THE EXECUTION 
OF ALL MEMORY REFERENCE AND OPERATE INSTRUCTIONS IN ALL FIELDS 
AND ADDRESSES, ALL INSTRUCTIONS, FIELDS, AND DATA ARE SELECTED 
FROM A RANDOM NUMBER GENERATOR, THE PROGRAM FILLS MEMORY WITH 
HALTS AFTER EVERY 4096 TEST INSTRUCTIONS HAVE BEEN EXECUTED, IF 
A OPTION #1 MODULE CM8316) IS SELECTED AND CONNECTED IN LOOP 
BACK MODE, THE MODULE WILL BE TESTED IN INTERRUPT MODE . DATA 
TRANSMISSIONS AND INTERRUPTS ARE TESTED ON BOTH THE SERIAL 
LINE UNIT AND THE 12 BIT PARALLEL I/O, ALSO THE REAL TIME CLOCK 
INTERRUPT IS TESTED, AFTER EVERY 4096 TEST INSTRUCTIONS HAVE 
BEEN EXECUTED, THE PROGRAM RELOCATES ITSELF, A PAGE AT A TIME, 
"UP AND DOWN" WITHIN ANY 2< TO 4K MEMORY FIELD, ONCE THE PROGRAM 
HAS RELOCATED "UP AND DOWN" WITHIN A SPECIFIC MEMORY FIELD, IT 
WILL RELOCATE UP INTO THE NEXT FIELD IF MORE THAN 4K OF MEMORY 
EXISTS AND THE NEXT FIELD CONTAINS AT LEAST 2K , THIS PROCEDURE 
WILL CONTINUE UNTIL THE LAST MEMORY FIELD IS ENTERED, THEN THE 
PROGRAM WILL RELOCATE ITSELF DOWN. A FIELD AT A TIME UNTIL FIELD 
ZERO iS REACHED , THEN THE ENTIRE SEQUENCE IS REPEATED, REFER TO 
THE FOLLOWING PARAGRAPHS FOR MORE DETAILED INFORMATION. 

REFER TO PARAGRAPH 5,4 FOR MEMORY REFERENCE TEST INSTRUCTION 

SETUP. THE PROGRAM VERIFIES THE EXECUTION OF ALL MEMORY 

REFERENCE INSTRUCTIONS UN>TAD« I SZ-DCA-JMS- JMP ) FOR THE FOLLOWING: 

A, THE INSTRUCTION RETURNED TO THE PROGRAM FROM THE CORRECT FIElD 

B, THE INSTRUCTION RETURNED TO THE PROGRAM FROM THE CORRECT ADDRESS 

C, CORRECT ADDRESSING MOOESl 

1, DIRECT AND INDIRECT ADDRESSING 

2, SAME PAGE AND PAGE ADDRESSING 

3, AUTO INDEX ADDRESSING 

D, THE CORRECT MEMORY AND AC DATA AFTER THE EXECUTION OF THE 
TEST INSTRUCTION, 

E, THE LINK DOESN'T CHANGE FOR THE FOLLOWING INSTRUCTIONS 
AND, ISZ, DCA, JMS AND JMP 

F, THE MQ DOESN' T CHANGE, 

REFER TO PARAGRAPH 5,6 FOR OPERATE TEST INSTRUCTION SETUP. THE 
PROGRAM SIMULATES THE EXECUTION OF THE TEST "OPERATE" INSTRUCTION 
AND VERIFIES THE HARDWARE EXECUTION OF THAT SAME OPERATE 
INSTRUCTION FOR THE FOLLOWING » 

A, THE INSTRUCTION RETURNED TO THE PROGRAM FROM THE CORRECT FIELD 

B, THE INSTRUCTION RETURNED TO THE PROGRAM FROM THE CORRECT ADDRESS 

C, AC DATA RETRUNED EQUALS THE SIMULATED AC DATA 

D, THE LINK DATA RETURNED EQUALS THE SIMULATED LINK DATA 

E, THE MQ DATA RETURNED EQUALS THE SIMULATED MQ DATA 



» 



THE OPTION H MODULE IS EXERCISED IN INTERRUPT MODE IF SELECTED , 
THE PROGRAM WHEN FIRST STARTED AND AFTER EACH PROGRAM RELOCATION 
GENERATES RANDOM DATA FOR THE SERIAL LINE UNIT AND THE 12 BIT 
PARALLEL I/O, THE INTERRUPT ENABLE FLIP-FLOPS ARE THEN SET FOR 
THE SERIAL LINE UNIT, THE 12 BIT PARALLEL I/O, AND THE REAL TIME 
CLOCK. THE RANDOM DATA IS THEN TRANSMITTED ON THE SERIAL LINE 
UNIT AND THE 12 BIT PARALLEL I/O, THE PROGRAM THEN TURNS THE 
INTERRUPT ON AND JUMPS To THE MAIN PART OF THE PROGRAM TO 
GENERATE AND TEST MEMORY REFERENCE AND OPERATE INSTRUCTIONS, 
WHEN A INTERRUPT OCCURSi THE PROGRAM DOES THE FOLLOWING? 

A. SAVE THE AC. LINK* AND THE INTERRUPTED PC 

g , THE PROGRAM DOES ONE OF THE FOLLOWING DEPENDING ON THE FLAG SET 
1'. SLU XM I T FLAG « CLEAR XMIT FLAG, GO TO STEP C 
2'. SLU RECV FLAG ■ CLEAR RECV FLAG-COMPARE XMIT DATA WITH 

DATA READ-GENERATE NEW RANDOM DATA AND TRANSMIT IT, 

GO TO STEP C, 

3'. PARALLEL I/O - CLEAR DATA READY FLAG-CHECK DATA ACCEPTED 

1N»C0MPARE DATA, GO TO STEP C. 
4'. RTC FLAG » CLEAR REAL TIME CLOCK FLAG-GENERATE 

RANDOM DATA FOR PARALLEL I/O AND TRANSMIT IT, GO TO STEP C, 
5'. AC LOW FLAG » CLEAR THE FLAG-CHECK BATTERY EMPTY F/F 

IF SET PROGRAM HALTS, IF NOT GO TO STEP C 



C, THE PROGRAM CHECKS ALL DEVICES TO BE ACTIVE, RESTORES THE 
LINK, THE AC. ISSUES A RMF INSTRUCTION AND RETURNS TO THE 
PROGRAM WHERE IT WAS INTERRUPTED FROM. 

D. WHEN THE PROGRAM IS READY TO BE RELOCATED, THE PROGRAM 
WAITS FOR THE FLAGS AND THEN TURNS THE INTERRUPT OFF, 

9.0 FLOWCHARTS 



NONE 
10, LISTING 



ATTACHED 



» 



/2K TO 32K pDp-8A PROCESSOR EXERCISER PALX0 V142 21-0EC-74 

/2K TO 32K P0P»8A PROCESSOR EXERCISER 
/ 

/MAINDEC03-DJEXB-A-L 

/COPYRIGHT 1974, DIGITAL EQUIPMENT CORPptflTIC^ 
/ 

/PROGRAMMES! BRUCE HANSEN 
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7421 
7701 
7604 
7402 
6160 
6244 
6035 
6007 
6101 
6102 
6103 
6135 
6136 
6137 

6570 
6571 
6572 
6573 
6574 
6575 
6576 
6577 



MQL=7421 

ACL=770t 

LAS=>7604 

HLW402 

5IMCLR 3 6163 

RMF»6244 

KIE=6035 

CAF=6007 

S3£=>6101 

SPL«6102 

CAL=6103 

CLLE=6135 

CLCL=6136 

CLSK=6137 

OBST=657? 
09SK=657l 
0BRO=6572 
D8CF=6573 
0BT0=6574 
03SE=6575 
0BCE=6576 
D3SS=6577 



/CLEAR SIMUALATOR LOGIC 



/CLEAR ALL FLAGS 
/SKIP ON BATTERY EMPTY 
/SKIP ON AC LOW 
/CLEAR AC LOW F/F 

/SET I NT ENA ON REAL TIME CLOCK IF DATA BIT 11 ON A 
/CLEAR REAL TIME CLOCK FLAG 
/SKIP ON REAL TIME CLOCK FLAG 

/SKIP ON DATA ACCEPTED CLEAR IT AND DATA AVAILABLE 
/SKIP ON DATA READY 

/READ THE 12 BIT PARALLEL I/O REGISTER IN TO THE AC 

/CLEAR DATA READY-SET DATA ACCEPTED 

/LOAD THE 12 BIT PARALLEL I/O BUFFER AMD TRANSMIT 

/SET PARALLEL I/O INTERRUPT ENABLE F/F 

/CLEAR PARALLEL I/O INTERRUPT ENABLE F/F 

/ ISSUE A STROBE PULSE 



3000 
6202 
5403 
3102 
0004 £000 
0305 ^200 



0001 
0002 
0003 



CIF Z0/XX 
J»" I INT 

INT, INTERS 

RETPNT, 3 

STRFLD, 3GN 



/MR I AND OPR RETURN POINTER 

/STARTING ADDRESS AND FIELD PROGRAM IS LOCATED 



0010 
0011 



2010 »10 

0000 AUTO10, 

0000 AUTOll, 3 



0020 
0021 
0022 



.20 

SWITCH, 3 

0P1SEL, 3031 

0P2SEL, 0030 



/2K TO 32K PDP-£ 



PROCESSOR EXERCISER PAL10 V142 21-DEC-74 
/SWITCH REGISTER SETTINGS 
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/S30«l INHIBIT ERROR HALT 

/S^l"! LOOP ON ERROR OR TEST CONDITIONS 

/S^2=l INHIBIT PROGRAM RELOCATION 

/SR3tl HALT AFTER EXECUTION OF A PROGRAM PASS<4396 TEST INSTRUCTIONS) 

/LOCATIONS 0005 TO 0177 WILL BE OVERLAYED ONCE THE PROGRAM HAS BEEN STARTED, 
/IF THE PROGRAM HAS BEEN SETUP TO RUN WITH OR WITHOUT THE FRONT PANEL 
/SWITCH REGISTER, IT CANNOT BE REINITIALIZED AGAIN. THE ONLY WAY TO 
/CHANGE TH£ FRONT PANEL STATUS IS TO RELOAD THE PROGRAM AND REINITIALIZE IT, 

/THE FOLLOWING ROUTINE WILL CHANGE "TAD (I) SAVSWR" TO LAS i IF THE 
/OPERATOR SET BIT OF LOCATION 21 TO A ONE. 



0023 


0030 


PATCH, 









0024 


1136 




TA3 


K5771 




0025 


3543 




OCA I 


LDC203 




0026 


1137 




T A3 


K5772 




0027 


3541 




DCA I 


LOC201 




0030 


7340 




CLA CLL 


CMA 




0031 


1023 




TA3 


PATCH 




0032 


3023 




OCA 


PATCH 




3033 


6160 




SMCLR 






3034 


1021 




TA3 


OP1SEL 


/GET THE HARDWARE CONFIGURATION 


0035 


7700 




SMA 


CLA 


/IS THE FRONT PANEL SWITCH REGISTER TO BE 


0036 


5052 




JMP 


PATCH1 


/CHECK FOR ACT LINE 


0037 


1142 




ta: 


MM6 




0040 


3143 




DCA 


LASCNT 




0041 


1144 




TAD 


LASTAB 




0042 


3145 




DCA 


PATMOV 




0043 


1545 




TA3 I 


PATMOV 




0044 


3146 




DCA 


PATMVi 




3045 


1147 




TAD 


KLAS 




0046 


3546 




OCA I 


PATMVI 




0047 


2145 




ISZ 


PATMOV 




0050 


2143 




ISH 


LASCNT 




0051 


5043 




JMP 


.'6 




0052 


1022 


PATCH1, 


TAD 


0P2SEL 


/CHECK FOR THE ACT LINE BIT 


0053 


7703 




SMA 


CLA 


/IS IT SET ? 


0054 


5423 




JM» I 


PATCH 


/NO RETURN TO THE PROGRAM 


0055 


1125 




TAD 


OVRLAY 




0056 


3010 




DCA 


AUTO10 




0057 


1126 




TAD 


MRJOVR 




0060 


3011 




OCA 


AUTOll 




0061 


4103 




JMS 


MOVOVR 


/GO OVERLAY FIRST 5 LOCATIONS OF ERROR 


0062 


1127 




TAD 


OVRLY1 




0063 


3010 




OCA 


AUTO10 




0064 


1130 




TAD 


OPROVR 




0065 


3011 




DCA 


AUTOll 




0066 


4103 




JMS 


MOVOVR 


/GO OVERLAY FIRST 5 LOCATIONS OF ERROPR 


0067 


1132 




TA3 


K7610 


/PUT SKIP UNCONDITIONALLY IN QPRERR+i 


0070 


3531 




DCA I 


QPRSKP 


/IN ORDER TO GO TO ERROPR 


0071 


1021 




TA3 


OP1SEL 


/GET THE HARDWARE CONFIGURATION 



/2K TO 32K PDP-8A PROCESSOR EXERCISER 
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0072 


0134 




AN9 


C0N37 


0073 


1135 




TAD 


MIN37 


0074 


7/ '.;| 

/ o «*e 




as * 




0075 


5302 




JMP I 


PATCHC 


0076 


7240 




CIA 


CMA 


007? 


1021 




TAD 


OPISEL 


0100 


3021 




OCA 


OP1SEL 


0101 


5502 




JMP I 


PATCHC 


0102 


3600 


PATCHC, 


PATCH2 




0103 


0000 


MOVOVR, 







0104 


1133 




TAT 

TAJ 


H3 


0105 


3145 




OCA 


PATMOV 


0106 


14i0 




TAD I 


AUTO10 


0107 


3411 




OCA I 


AUTOll 


0110 


2145 




ISZ 


PATMOV 


0111 


5106 




JMP 


,-3 


0112 


5503 




JMP I 


nUvUVft 


0113 


6002 


AEROV1, 


[OF 




0114 


6272 




CI? 


70 


0113 


1767 




1767 




0116 


5717 




5717 




0117 


6520 




6520 




0120 


6002 


AEROV2, 


ior 




0121 


6272 




CIP 


70 


0122 


1745 




1745 




0123 


5712 




1 9 

T>» 2.C 




0124 


6520 




6520 




0125 


0112 


OVRLAY, 


AEROV1* 


i 


0126 


1312 


MRIOVR, 


ER30R-1 




0127 


0117 


OVRLY1. 


AE30V2« 


i 


0130 


2305 


OPRUVR, 


ER30PR- 


i 


0131 


2745 


OPRSKPi 


3PRERR*1 


0132 


7610 


K7610, 


SK S 


CLA 


0133 


7773 


M9i 


.5 




0134 


J037 


C0N37, 


37 




0135 


7741 


M1N37< 


-37 





/MASK OFF MEMORY SIZE 

/CHECK TO SEE IF 32K SELECTED 

/IS THERE 32K SELECTED? - 

/NO. GO TO NEXT BUFFER £0 GET NEXT OVERLAY 

/SUBTRACT IK FROM 32KX 

/SAVE MEMORY SIZE AS 31K 
/CONTINUE THE OVERLAY FOR ACT LINE 



0136 


5771 


K5771, 


5771 


313? 


5772 


K9772i 


5772 


0140 


0200 


L0C233, 


3GN 


0141 


3201 


LOC201i 


aGS+1 


0142 


7772 


MM6, 


• 6 


0143 


7772 


LASCNT, 


-6 


0144 


,5150 


LASTA3, 


TA3LAS 


0145 




PATMOV r 





0146 


21000 


PATMV1, 


3 


0147 


7604 


KLAS, 


LAS 


0150 


0252 


TA3LAS, 


LPDNT 
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3151 
0152 
0153 
0154 
0159 



15274 
3301 
1342 
2737 
2744 



XCNT+3 

AR^ANG- 

LOOPSH 

LPSW3 

OP^ERR 





3200 


• 233 
/ 








0203 


0000 


BGN. 


3/JMS PATCH/JMP 1 


. XBGRAN 


0201 


0000 




0/JMS PATCH/JMP 1 


. XBGCON 


0232 


0000 


CHANGE i 









0203 


1602 




TAD 


I CHANGE 




0204 


7450 




SNA 






3203 


5602 




JM» 


I CHANGE 




0206 


1212 




TAD 


SU3A00 




020? 


3602 




OCA 


I CHANGE 




0210 


2202 




ISZ 


CHANGE 




0211 


5203 




JM» 


,-6 




3212 


0000 


/ 

SUBAOD, 









0213 


3000 


OIRFLG, 


3 






0214 


0200 


LOWLIM, 


203 






0215 


7400 


M433, 


»430 




0216 


1245 


1 

SWAPli 


TAD 


S2PRG 




021? 


3202 




OCA 


CHANGE 




0220 


1375 




TAD 


XENDPR 




0221 


3246 




OCA 


CNTR2 




3222 


1251 




TAD 


M200 




0223 


1375 




TAD 


XENDPR 




0224 


3247 




DC A 


CNTR3 




0229 


1647 


MOVUPi 


TAD 


I CNTR3 




0226 


3646 




DC A 


I CNTR2 




0227 


1647 




TAD 


I CNTR3 




0230 


7041 




CIA 






0231 


1646 




TAD 


I CNTR2 




0232 


7640 




SZA 


CLA 




0233 


7402 




HIT 






0234 


7040 




CMA 






0239 


1247 




TAD 


CNTR3 




0236 


3247 




OCA 


CNTR3 




023? 


7040 




CMA 






0240 


1246 




TAD 


CNTR2 




0241 


3246 




DCA 


CNTR2 




0242 


2202 




ISZ 


CHANGE 




0243 


5225 




JMP 


MOVUP 




0244 


5776 




JMP 


I RSCNT 




0249 


4401 


/ 

SZPRGi 


3GN- 


■PRGEND-1 




0246 


0000 


CNTR2 i 









0247 


0000 


CNTR3, 









0250 


0400 


<403. 


403 






0251 


7600 


M200. 


• 23B 





/GET THE WORD TO MODIFY 
/IS IT EQUAL TO ZERO 
/YES ALL DONE MOD I F 1 NG 
/SUBTRACT OR ADO 200 
/RESTORE THE MODIFIED WORD 

/GET THE NEXT WORD TO MODIFY 



/ROUTINE TO SWAP PROGRAM UP 
/SAVE PROGRAM SIZE 
/MODIFIED END OF PROGRAM 



/GET ACTUAL END OF PROGRAM 
/COMPARE THE WORD THAT WAS RELOCATED 

/COMPARE ERROR DURING RELOCATION 
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/ 



0252 


1336 


LPCNT t 


TA3 


oAVaWn/L AS 


J\ OHD AM T U ^ T 1 IP 1* T D M TT 0D4 rH 
/ L U F DN INoTrlUl/TIUN 1 r K 1 * 1 


0253 


7004 




RAi, 






0254 


7700 




SM A 


CLA 


/tXlT»ANu 0Unr COUNIEKa 


0255 


5271 




JM^ 


XCNT 


0256 


1762 




TAD 


I XINSTR 


/IS INSTRUCTION INDIRECT 


0257 


0250 




AND 


K400 




0260 


7650 




SNA 


CLA 




0261 


5763 




JM* 


I XNTIND 


/NOjRESET DATA INREFERANCE ADDRESS 


0262 


1762 




TAD 


I XINSTR 


/YES * REGENERATE REFERENCE ADDRESS 


0263 


0214 




AND 


LOWL IM 


/MASK OUT PAGE BIT 


0264 


7640 




S2 A 


CLA 




0265 


1764 




TAD 


I XASAVA 




0266 


1 7 A ^ 




TAT 


1 A Ao A v □ 




026? 


3766 




OCA 


I XREFAD 




0270 


5767 




JM° 


1 XLOOP 




0271 


2247 


XCNT , 


1 sz 


CNTR3 


/BUMP PASS COUNTER 


0272 


5770 




JM P 


I RSCNTX 




0273 


4760 




JnS 


I WAIT 


/ 1 r Ur 1 1 UN 1 oLULv 1 CiJ WA 1 1 run r LALtO 


0274 


1336 




TAD 


SAVSWR/L AS 


/CHECK SR3 To HAlT AFTER A PROGRAM PASS 


0275 


7006 




RT W 






0276 


7004 




RAL 






0277 


7710 




5" A 


CLA 




0300 


7402 




HLT 




/5R3sl HAL' A' END OF A PROGRAM PASS 


0301 


1336 




TAD 


SAva WR/L AS 










RT' 




/fin MnT Rri nraTF ir coosi 


0303 


/ 'IB 




SP 4 


vL A 




0304 


5776 






I R S C N T 




0305 


6224 


_ . 
ARRANGi 


DTP 




/ficT MrtMr ftti n 




7 d1 
/ I3 1 X 




r T A 






030/ 


. IRA 

1/30 




t r. ~\ 

I A J 


l ™ ■ LU 


/ T ^ IT t* HI I A I Tr» i iQT F T F I n 


0310 


7640 






vU A 




0311 


7240 




f-l A 


pus 
vrl A 


/Mfl PPHflPAM T 5 TM A dK FTn n 


0312 


7450 




SNA 




/VCt* t M r ACT FTCl t\ |*FT uoPrO I 1UTTC 
/ T L a * IN L A a 1 rILLU bLI U r " fc. « l_ 1 H X T a 








TAJ 


I V 1 IPC 1 




0314 


3774 




DC A 


T U 1 rui u 
I HibnLM 


/SAVE UPPEH LIMIT 


03l5 


1213 




r A 3 


D I RFL.G 


/IS THE PROGRAM ROLLING UP OR ROLLING BACK 


0316 


7640 




a£ A 


CLA 




031 7 


5761 




iM D 

Jnr 


1 ArtULBK 


/Int. PnUwrtAn la nULLlNi* aAl/K 


0320 


10'-' 


_ ._ 

n QLLUr 1 


T & 1 

1 A J 


XENDPR 


/ftrT F Mn nr pphi^d am j\wr\ fnMPAPc tT 


0321 


7040 




"MA 




/WTTW W I nM 1 TMTT<1 
(HI i n niun u i n i i 3 


0322 


1774 




T A J 


1 n i wn Wfl 




^3 23 


7650 






n a 

UU A 




0324 


5761 




IMP 


T ¥ P n 1 nu* 
1 Ar%ULBr\ 


/ 1 n i a la <N L L 'J C U r*J*< A 1(\ r ItLU Jintn 'nAN o 


0325 


5327 




JM° 


SETFLG 




0326 


7240 




CLA 


CMA 


/NO, SET REVERSE r LAG 


0327 


3213 


SETFLG, 


DC*. 


OIRF'UG 


/»1 IF GOING REVERSE; IG FORWARD 


0333 


1213 




TAD 


3IRFLG 


/ROLLING UP OR ROLLING BACK? 


0331 


7640 




SZA 


CLA 




0332 


1215 




TAD 


1400 


/ROLLING BACK IF DIRECTIONN FLAG = -1 


0333 


1214 




TAD 


LOWLIM 


/ROLLING UP IF FLAG = t 


0334 


3212 




DCA 


SUBAOO 


/SAVE 200 OR -203 


0335 


5355 






ACHNG 
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0336 


0000 


SAVSWR, 
/ 







0337 


0000 


F0INIT, 


3 




0343 


6201 




CDF 00 


/CHANGE DATA FIELD TO FIELD 


0341 


6224 




Rir 


/READ THE INSTRUCTION FIELD 


0342 


1340 




TAD F0INIT+1 


/GET THE COF INSTRUCTION 


0343 


7001 




I AC 


/MAKE IT A GIF TO PROGRAH FIELD 


0344 


3745 




DCA I CIFFD0 


/PUT IT IN LOCATION 1 OF FIELD 


0345 


0001 


CIFFO0I 


INT-2 




0346 


7240 




CLA CMA 


/SET THE AC TO ALL ONE'S 


0347 


1745 




TA: I CIFFD0 


/CHANGE CIF BACK TO CDF PROGRAM FIELO 


0350 


3352 




DCA .+2 


/PUT IT IN NEXT LOCATION 


0351 


4757 




JHS I SET I NT 




0392 


7402 




ULT/CDF 


TO PROGRAM FIELD 


0353 


5737 




JM» I F3INIT 


/RETURN TO PROGRAM 




0355 


• 355 






0355 


4202 


/ 

ACHNG, 
/ 


JMS CHANGE 




0356 


1144 


XFLDi 


FL3LIM 




0357 


2137 


SETINT, 


1NTSET 




0360 


3357 


WAIT, 


WA I TEN 




0361 


0401 


XROLBK i 


ROLBAK 




0362 


0746 


XINSTR, 


INSTR 




0363 


2625 


XNTINO, 


NOTXND 




0364 


1146 


XASAVA , 


ASAVA 




0365 


1147 


XASAVB, 


ASAV3 




0366 


0747 


XREFAOi 


REFAO 




0367 


0602 


XLOOP, 


L03PI0+1 




0370 


1001 


RSCNTX, 


GENFLO 




0371 


3027 


XBGRAN, 


9GMC0N+1 




0372 


3026 


XBGCON, 


BGNCON 




0373 


1550 


XUPERL, 


UPSLIM 




0374 


1145 


HIGHLH, 


HGHLtH 




0375 


3576 


XENOPR, 


PR3EN0 




0376 


3424 


RSCNT, 


STARTP 




0377 


0000 











0400 


/ 

«400 






0400 


5351 




JM» AACHNG 




0431 


1367 


/ 

ROLBAK, 


TAD 8EGIN 


/GET BEGINNING OF PROGRAM AND COMPARE 


0432 


7041 




CU 


/WITH THE LOW LIMIT 


0403 


1770 




TAD I XLWLIM 


/ 


0404 


7640 




SHA CLA 


/IS tT EQUAL 


0405 


5771 




JMP I RTFLOR 


/NO , ROLL THE PROGRAM BACK 


0406 


3772 




DCA I RTFLG 


/SET DIRECTION FLAG TO FORWARD 


0407 


1773 




TAD I MAXFLD 


/IS THE PROGRAM LIMIT ONLY 2X-4K 


0410 


7650 




SNA CLA 




0411 


5774 




JM» I RTFLGF 


/YES, DO NOT SWAP BUT ROLL THE PROSRA^ 


0412 


1300 




TAJ FLDFLG 


/SWAP THE PROGRAM UP OR DOWN 
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0413 


7640 




SZA CLA 




0414 


5222 




JMP SwAPON 


/swap The program down 


0415 


6224 


SWAPUP, 


RIP 


/GET PROGRAM FIELD 


0416 


1301 




TAD K10 


/ADD 1 FIELD TtJ, IT 


041? 


7041 




CIA 


A 


042!) 


1773 




TAD I MAXFLD 




0421 


5753 




JMP ! CSWPUP 




0422 


6224 


SWAPON, 


RIF 


/GET HOME FIELD 


0423 


7450 




SNA 


/IS IT EQUAL TO FIELD 


0424 


5215 




JMP SWAPUP 


/YES, SWAP THE PROGRAM UP 


0425 


1303 




TAD N10 


/SUBTHACT 1 FIELD 


0426 


7640 




SZA CLA 


/IS IT EQUAL TO FIELD 3? 


042? 


5232 




JM» SFLDFG-1 


/NO, SET FLAG TC REVERSE AND SWAP DOWN 


0430 


3300 




OCA FLOFlG 


/YES i BUT SWAP DOWN AND SET FLAG TO FORWARD 


0431 


5236 




JMP ,+5 


/GO SWAP IT 


0432 


7240 




CLA CMA 




0433 


3300 


SFLDFG, 


OCA FLDFLG 


/FIELD FLAG=0 SWAP UPJ-1 SWAP DOWN 


0434 


1300 




TAD FUDFLG 


/SWAPING UP OR DOWN 


0435 


7640 




SZA CLA 




0436 


1302 




TAD M20 


/SWAPPING DOWN 


0437 


1301 




TAD Kit 


/SWAP I NG UP 


0440 


3276 




OCA NEWOFA*l 


/SAVE 10 OR -10 


0441 


6224 




RIF 


/GET HOME FIELD 


0442 


1276 




TAD MEWDFA+1 


/ADD OR SUBTRACT A FIELD 


0443 


1326 




TAD 36201 




0444 


3257 




DCA NEWDTF 


/PUT 62X1 IN THE SWAP ROUTINE 


0445 


6224 




RIF 


/GET HOME FIELD 


0446 


1326 




TAD 36201 




0447 


3263 




OCA SWPFLO 


/TO RETURN BACK TO HOME FIELD 


0450 


1257 




TAD NEWDTF 




0451 


3275 




OCA MEWOFA 




0452 


1775 


SWPUP, 


TAD I XSIZE 


/GET PROGRAM SIZE 


0453 


3276 




OCA NEWDFA+1 




3454 


1770 




TAD I XLWLIH 


/GET BEGINNING ADDRESS OF PROGRAM 


0455 


3304 




OCA RETHR 


/SAVE IT 


0456 


1704 




TAD I RETHR 


/GET WORD FROM HOME OF 


0457 


7402 


HEHOTFi 


HLT/COF 


/CHANGE TO NEW DATA FIELO 


0460 


3704 




OCA I RETHR 


/PUT THE WORD IN NEW FIELD 


0461 


1704 




TAD I RETHR 


/COMPARE THE MOVE 


0462 


7041 




CIA 




0463 


7402 


SNPFLQj 


HLT/COF 


/CHANGE BACK TO OWN FIELD 


0464 


1704 




TAD I RETHR 




0465 


7640 




SZA CLA 


/ARE THEY EQUAL? 


0466 


7402 


HLTFIL* 


HLT 


/ERROR DURING RELOCATING TO ANOTHER FIELD 


0467 


2304 




1 S3 RETHR 




0470 


2276 




I S Z NEWDFA+1 




0471 


5256 




JMP NEWDTF-1 




0472 


2257 




1 S 2 NEWDTF 


/MAKE 62X2 


0473 


1257 




TAD NEWOTF 




0474 


3276 




DCA ,+2 




0475 


7402 


NEWDFAi 


HLT/CDF 


/CHANGE TO NEW DATA FIELD 


0476 


7402 




HLT/CIF 




0477 


5776 




JM = I XGO 





/ 
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0503 


3000 


FLOFLG, 


I 


0531 


i5010 


K10i 


10 


3532 


7760 


H20, 


.23 


3503 


7770 


M10, 
/ 


-13 


0504 


3000 


RETHR, 





0505 


3327 




DCA FILALL 


0506 


6214 




RDF 


0507 


3325 




OCA RETFLD 


0513 


7402 




HLT/CDF 


0511 


7701 




AC. 


0512 


3756 




DCA I RTMQl 


0513 


7010 




RA* 


0514 


3757 




DCA I RTLII 


0515 


1760 




TAD I B1NSTR 


0516 


7006 




RTL 


0517 


7006 




RTL 


0520 


S343 




AND 87 


0521 


1324 




TAD BGOTST 


0522 


3323 




DCA ,+i 


0523 


0000 







3524 


5761 


/ 

3G0TST, 


JM= I TSTINS 


0525 


0000 


R E T F L D , 


3 


3526 


6201 


36201, 


6231 






/ROUTINE T3 FILL THE 


0527 


0030 


FILALLi 


3 


0530 


3304 




DCA RETHR 


0531 


1754 




TAD I XSTFLD 


0532 


1326 




TAD B6201 


0533 


3340 




DCA CDHLT1 


0534 


6224 




air 


0535 


1326 




TAD B6201 


0536 


3344 




OCA COHLT2 


353? 


1266 




TAD HLTFIL 


0540 


7402 


CDHLT1, 


HLT/COF 


0541 


3704 




DCA I RETHR 


0542 


2304 




ISZ RETHR 


3543 


0007 


B7, 


7 


0544 


7402 


CDHLT2 i 


HLT/CDF 


0545 


2755 




ISZ I ZLIMIT 


0546 


5337 




JMP ,-7 


054? 


5727 




JMP I FILALL 




0551 


/ 

• 551 




0551 


4752 


/ 

AACHNGi 


JMS I XCHNGE 


0552 


0202 


1 

XCHNGEi 


CHANGE 


0553 


1116 


CSWPUP« 


DECSwP 


0554 


0247 


XSTFLO, 


CNTR3 


0555 


1145 


ZLIMIT, 


HGHLIM 



/JMS RETURN FROM INSTRUCTION 
/SAVE AC RETURN DATA 
/GET DATA FIELD INSTRUCTION WAS IN 
/SAVE IT 

/RETURN TO PROGRAM FIELD 
/READ IN THE MO 
/SAVE THE MQ 

/GET THE LINK INTO AC BIT 
/GO TEST THE INSTRUCTION 
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0556 


2753 


RTMQO > 


MQOONE 




055? 


2791 


RTLINK, 


L I WON 




0560 


3746 


BINSTR, 


INSTR 




0561 


1231 


tSTINSi 


ANDTST 




0562 


1223 


TSTIN1, 


TA3TST 




0563 


1234 


TSTIN2, 


ISSTST 




0564 


1255 


T3TIN3, 


DCATST 




0565 


1267 


TSTIN4, 


JMSTST 




0566 


1304 


TSTIN5, 


JHPTST 




3567 


0200 


BEGIN, 


BCN 




0573 


0214 


XLWLIM, 


LOrfLIM 




0571 


3326 


tfl.gr ■ 


SETF|»G"1 




0572 


3213 


RTFLG, 


OIRFLG 




0573 


1144 


MAXFLD, 


FLDLIM 




0574 


0327 


RTFLGF, 


SETFlG 




0575 


3245 


XSIHE. 


SHPRG 




0576 


3424 


XGO, 


S T AR T P 




357? 


■J000 










2630 


«600 
/ 






0603 


5366 




JMP ACHG 




0631 


3350 


LOOPID, 


OCA 1NDAD 


/SaVE THIS WORD as indirect ADORESS 


0602 


1360 




TAD <777fl 


/check FOR auto-inoex 


3603 


1347 




TAD REFAD 




0604 


7510 




SPA 


/WAS If LESS THAN 10 


0635 


5211 




JM 3 NOTAUT 


/YES, NOT AUTO-INDEX 


.7606 


7161 




CH STU 




360? 


1343 




TAO A7 




0613 


7630 




SZl. CLA 


/WAS IT WITHIN AUTO BOUNDARY 


0611 


7610 


NOT AUT i 


SK S CLA 


/NO, NOT AUTO-INOEX 


3612 


7340 




CLA CLL CHA 


/AUTO INDEX, SU8TRACT 1 FROM INOIRECT ADDRESS 


0613 


1350 




TAD INDAD 




0614 


3310 




OCA SETRET 


/SAVE INDIRECT ADDRESS 


0615 


1354 




TAD RANFLD 




0616 


1356 




TAD <623i 


/CHANGE TO A RANDOM OATA FIELD 


3617 


3220 




OCA ,+1 




3623 


7402 




HLT/COF 




3621 


1313 




TAO SETRET 


/GET INDIRECT ADDRESS 


3622 


3747 




OCA I REFAO 


/PUT INDIRECT ADORESS INTO REF ADO 


3623 


1353 




TAO INOAO 




3624 


3347 




OCA REFAO 


/HAKE REFADMNDAO 


3625 


7333 


HOTIND. 


CLA CLL CML RAR 




3626 


1346 




TAO INSTR 




0627 


763? 




SZ. CLA 


/WHAT TYPE OF INSTR 


3630 


5265 




JM 3 JMPJMS 


/IT WAS A JMP OR JMS 


0631 


1354 




TAO RAMFLO 




3632 


1356 




TAO <6201 




0533 


3234 




OCA .+1 




3634 


7402 




MLT/CDF 


/CHANGE TO A RANDOM OATA FIELD 


0635 


1351 




TAO DATATH 


/GET INITIAL MEMORY OATA AND PUT IT IN 


0636 


3747 




OCA I REFAD 


/REF ADD OR INDIRECT ADD FOR AND THROUGH OCA 


0637 


7243 


OPRINT, 


CLA CMA 


/SUBTRACT 1 FROM INSTRUCTION AOORESS 
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0643 


1345 


TAO 


AODRS 


/AND SAVE IT 


3641 


3344 


DCA 


HOMCIF 




3642 


6224 


R '. r 






3643 


1357 


TAO 


<6202 


/SET UP HOME INSTRUCTION FIELD 


0644 


3744 


DCA 


I HOMCIF 


/IN INSTRUCTION AODRESS-1 FOR AND-DCA 


0645 


7331 


CLA 


CLL I AC 




3646 


1345 


TAO 


ADDRS 




3647 


4310 


JHS 


SETRET 


/SETUP RETURN, INSTR ADD+1 , +2*4 400 FOR AND 
/LOCATION 3 CONTAINS RETURN POINTER 


0653 


1346 


'JOTJJ, TAO 


INSTR 


/PUT INSTRUCTION IN INSTRUCTION ADDRESS 


0651 


3745 


OCA 


I AODRS 




3652 


1355 


TAO 


SAVLNK 




3653 


7104 


CLL 


RAL 




3654 


1393 


TAO 


MQOATA 


/GET THE RANDOM MO DATA 


3655 


7421 


MQL 




/AND LOAO IT INTO THE MO 


0656 


7200 


CLA 




/SAFETY CLEAR THE AC IN CASE MQL DOESN'T 


3657 


1354 


TAO 


RANFLD 


/MAKE UP A CIF TO A RANDOM FIELD 


0663 


1357 


TAO 


<6202 




0661 


3263 


OCA 


.*2 




0662 


1352 


TAO 


OATAHR 


/GET THE AC DATA INTO THE AC 


0663 


7402 


HLT/CIF 


/D,F, HAS BEEN CHANGED NOW CHANGE I.F. 


0664 


5744 


JM = 


I HOMCIF 


/GO EXECUTE INSTRUCTION IN RANDOM P I ELD 



//FOR ANC'S THROUGH OCA'S OIRECTS THE INSTRUCTION SETUP IS AS FOLLOWS i 
/ 

/SOME RANDOM FIELD 

/LOCATION 4 OF THIS FIELD EQUALS RETURN POINTER To PROGRAM FIELD 
/THE AC EQUALS SOME RANDOM NUMSER 



/INST AD0-1= 
/INST ADD = 
/INST AOO+1: 
/INST AD0+2= 

/ 

/REF AOO = 



CIF TO PROGRAM FIELD 
TEST INSTRUCTION 
JMS I 4 
JMS I 4 

INITIAL MEMORY DATA , THIS IS THE LOC THE INST WILL REFERENCE 



//////////////////////////////////////// 



//FOR AND ' S THROUGH DCA'S INDJRECTS THE INST SETUP IS AS FOLLOWS 

/ 

/SOME RANDOM FIELD 

/LOCATION 4 OF THIS FIELD EQUALS RETURN POINTER TO PROGRAM FIELD 
/THE AC EQUALS SOME RANDOM NUM8ER 



/1NSR ADO-ls 
/INST ADO a 
/INST ADD*1» 
/INST ADD*2= 
/ 

/REF ADD = 
/ 

/I HQ ADD = 



CIF TO HOME FIELD 
TEST INSTRUCTION 
JMS I 4 
JMS I 4 

INDIRECT ADDRESS 
INITIAL MEMORY DAA 



0669 1346 
0666 7006 
066? 7730 



JMPJMS, TAO INSTR 
RTL. 

SMA CLA 



/GET THE INSTRUCTION 
/IS IT A JMP OR JMS? 
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0670 


7031 


t AO 


0671 


1347 


TAO REFAD 


0672 


3310 


DCA setret 


0673 


1394 


TAD RANFLD 


0674 


1336 


TAO <6201 


0675 


3276 


OCA ,+J, 


0676 


7402 


HLT/CDF 


0677 


6224 


R I f 


0700 


1357 


TAD K6202 


0701 


3710 


OCA' ! SETRET 


0702 


7001 


IAS 


0703 


1310 


TAO SETRET 


3704 


4310 


JMS SETRET 


0705 


1345 


TAO ADORS 


0706 


3344 


OCA HOMCIF 


0707 


5250 


JM° NOTJJ 



/JMS ADO 1 TO REFERENCE ADDRESS FOR C IF INST 

/GET REFERENCE ADDRESS 

/AND SAVE IT FOR THE CIF INSTRUCTION 

/HAKE CDF !NST,-TO THE RANDOM FIELD 



/CHANGE TO RANDOM DATA FIELD 



/HAKE A CIF INSTRUCTION TO HOME FIELD 
/PUT IT IN REFERENCE ADD OR INDIRECT ADD 



/SETUP LOC 4 AND JMS I 4 [ N APPROPRIATE PLACES 
/GET INSTRUCTION ADDRESS 
/SAVE IT 

/GO GET INSTRUCTION ANO SETUP 

//THE INSTRUCTION SETUP FOR JMP DIRECTS IS AS FOLLOWS: 
/ 

/SOME RANDOM FIELD 

/L3C 4 OF THIS FIELD EOUALS RETURN POINTER TO PROGRAM FIELD 
/THE AC EQUALS SOME RANDOM NUMBER 
/INST ADD =JMP INSTRUCTION 
/ 

/REF AOD aCIF TO PROGRAM FIELD 
/REF ADO+1 =JMS I 4 
/REF ADD + 2 sJMS I 4 



////////////////////////// 
//THE INSTRUCTION SETUP FOR JMP INDIRECTS IS AS FOLLOWS: 
/ 

/SOME RANDOM FIELD 

/L3C 4 OF THIS FIELD EQUALS RETURN POINTER TO PROGRAM FIELD 
/THE AC EQUALS SOME RANDOM NUMBER 
/INST ADO eJMP INDIRECT INSTRUCTION 



/REF ADD 

/ 

/ 1 ND ADD 
/I NO ADO+1 
/I NO ADO + 2 



alNDJRECT ADDRESS 

= C i F TO PROGRAM FIELD 
aJMS I 4 
=JMS I 4 



//THE INSTRUCTION SETUP FOR JMS DIRECTS IS AS FOLLOWS 
/ 

/SOME RANDOM FIELD 

/L DC 4 OF THIS FIELD EQUALS RETURN POINTER To PROGRAM FIELD 
/THE AC EQUALS SOME RANDOM NUMBER 
/INST ADD =JMS DIRECT INSTRUCTION 
/ 

/REF ADD *SOME UNKNOWN NUMBER 
/REF ADD+1 =C!F TO PROGRAM FIELD 
/RE" ADD+2 =JMS I 4 



/2K TO 32K PDP-£ 



PROCESSOR EXERCISER PAL13 V142 
/REF ADD+3 =JMS I 4 
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///////////////////////// 
//THE INSTRUCTION SETUP FOR JMS INDIRECTS IS AS FOLLOWS 
/ 

/SOME RANDOM FIELD 

/LOC 4 OF THIS FIELD EQUALS RETURN POINTER To PROGRAM FIELD 
/THE AC EQUALS SOME RANDOM NUMBER 
/INST ADD =JMS INDIRECT INSTRUCTION 
/ 

/REF ADD INDIRECT ADDRESS 
/ 

/ I ND ADD =SOME UNKNOWN NUMBER 
/ 1 ND ADD+1 = C1F TO PROGRAM FIELD 
/ I ND ADD+2=JMS I 4 
/ I ND ADD+3=JMS I 4 



/THIS ROUTINE SETS UP LOC 3 IN SOME FIELD FOR RETURN PO INTER 

/TO THE PROGRAM AND ALSO SETS UP THE JMS I 0'S AFTER THE EXECUTION OF THE 

/INSTRUCTION, 



3710 


B003 


SETRET, 


3 




0711 


3362 




DCA 


JMSLOC 


3712 


7301 




SLA 


CLL IAC 


0713 


1362 




TAD 


JMSLOC 


0714 


3363 




DCA 


JMSLOO 


0715 


1364 




TAD 


KJMS 


0716 


3762 




DCA 


I JMSLOC 


0717 


1364 




TAD 


KJMS 


0723 


3763 




DCA 


1 JMSLDD 


0721 


1376 




TAD 


JMSRET 


3722 


3761 




DC 4 


I FLORET 


0723 


5710 




JM» 


I SETRET 


3724 


4773 


ERR0R2 i 


JMS 


I 2GETWD 


0729 


4770 




JMS 


I yhalt 


3726 


1352 




TAD 


OATAHR 


0727 


4770 




JMS 


I YHALT 


0733 


1774 




TAD 


I HFIND 


0731 


4770 




JMS 


I YHALT 


0732 


1355 




TAD 


SAVLNK 


0733 


4770 




JMS 


I YHALT 


0734 


1771 




TAD 


I FLINK 


0735 


4770 




JMS 


I YHALT 


0736 


1353 




TAD 


MQDATA 


0737 


4770 




JMS 


I YHALT 


0740 


1772 




TAD 


I FMQDAT 


0741 


4770 




JMS 


I YHALT 


0742 


5775 




JMP 


I HCNT 


0743 


0007 


/ 

A7. 


7 




0744 


0000 


HOMCIF, 







0743 


0000 


ADORS, 








/FINAL MEMORY DATA 

/AC DATA BEFORE EXECUTION OF I NSTR 

/AC DATA RETURNED 

/INITIAL LINK BEFORE EXEC OF I NSTR 
/ 

/LINK AFTER EXEC OF I NSTR 

/INITIAL MQ DATA 

/MO DATA AFTER EXEC OF I NSTR 
/BUMP COUNTER ANO RETURN 



/ADDRESS OF THE HOME CIF 

/THE ADDRESS OF THE INSTRUCTION 
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0746 


0000 


J.MSTR i 









/THE INSTRUCTION TO TEST 


0747 


0000 


RET AO i 









/thf AnnRFSS Thf imstr suoui n RFFFRrwrr 


0750 


0000 


I NDADi 


B 






/THE INDIRECT ADDRESS 


0751 


0000 


OATATHi 


B 






/THE DATA IN THE ADDRESS IF AND > DCA 


0792 


OS PI B 


DAT 4HEJ . 
U A I Ann t 


B 






yTur MAT** TW TUT AP AW PI \ IM* 
/Inc. U* in 1 fit. «L- AMU ? JnF 


0753 


0000 


MQO A TA i 


B 






/TUA TlA'ti rw TUF MO 
/ I n « l i"i i HE. nw 


0754 






B 








0755 


0000 




3 








0756 


6201 


K6201. 


6231 






0757 


6202 


K6202i 


6232 






0760 


7770 


K7770, 


7770 






0761 


0004 


FLORET, 


4 








0762 


0000 


JMSLQC, 


a 








0763 


0000 


JMSLOD, 


3 








3764 


4 404 


K JMS i 


JMS 


1 1 








'0 / D 


/ 

• 766 










0766 


4767 


f 
/ 


JMS 


I ARERNG 




/ROUTINE TO ULTER ADDRESSES 


076? 


^202 


f 

A K t, n 1 x U | 


CHANGE 






0770 


1336 


YH AL T i 


KALI 








0771 


2751 


FUNK, 


LlSKDN 






0772 


? 7 r 

CI JO 




MQDONE 






43773 


2112 


ZGETWD, 


GETWO 






0774 


527 


H F I N D i 


Fli.AU. 






0775 


0252 


ZCNT, 


LP3NT 






0776 


ii' 5 4 


JMSRET , 


RETHR 






0777 


0000 




3 












/ 

• llffcl f 










1309 


5350 




JM» 


A1CHG 






1001 


4763 


/ 


JMS 


I ARANdY 






1032 


0325 




an: 


K70 




/MASK WORD FOR FIELD BITS 


1033 


i!327 




AND 


FLOMSK 




/MASK WORO FOR FIELD 


1004 


1 330 




TAD 


CONFLD 




/CONSRAINT WORD FQR FIELD 


1005 


*i 325 




AND 


K7Z 






1006 


3756 




OCA 


I FLORAN 






1007 


1756 




TAD 


I FLDRAN 




/COMPARE RANDOM FIELD WITH UPPER LIMITS 


1010 


7041 




CIA 








1011 


1344 




" A D 


FLDLIM 






1012 


7510 




SPA 






/WITHIN LIMITS ? 


1013 


5201 




JMP 


GENFlD 




/NO REGERATE A NEW FIELD 


1014 


7640 




SZA 


CLA 




/WAS IT THE LAST MEMORY FIELD 


1015 


7243 




CUA 


CMA 




/NO SET UPPER BOUNDRY = TO 7777 


1016 


7450 




SNA 






/ 


1017 


1757 




TAD 


I XUPLIM 




/GET THE UPPER LIMIT OF LAST FIELD 


1023 


3345 




DC A 


HGHLIM 




/SAVE THE UPPER BOUNDRY 


1021 


1345 




TAD 


HGHLIM 




/SETUP A NUMBER FOR aO'JNORY COMPARE 


1322 


7041 




CIA 








1323 


1326 




TAD 


ADD11 






1024 


3760 




DCA 


I X8N0CN 




/SAVE THE NUMBER FOR CHECKING 80UNDR I ES 
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P AGE 1-13 



1025 
1026 
1027 
1033 
1031 
1032 
1033 
1034 
1035 
1036 
1037 

1040 

1041 
1342 
1043 
1244 
1045 
1046 
1047 
1050 
1051 
1052 
1053 
1054 
1055 
1056 
1057 
1062 
1361 
1362 
1363 
1064 
1065 
1066 
1067 
1073 
1071 
1072 
1373 
1074 
1375 
1276 
1077 
1100 
1101 
1102 
1103 
1104 



4763 
2335 
1336 
3771 
4763 
0337 
1340 
3772 
7010 
3774 
4763 
0341 
1342 
3773 
4763 
K345 
v5331 
1332 
4764 
5243 
3766 
1766 
U305 
3346 
4755 
4764 
5305 
4761 
5305 
3770 
6214 
1323 
3765 
1767 
0324 
7650 
5775 
4763 
0345 
3333 
1334 
4764 
5312 
4761 
5312 
4762 
5312 
5776 



ME MO AT 1 JMS 
AND 
TAD 
DCA 

ACOATA, JMS 
AND 
TAD 
DCA 
RA=) 
DCA 

GENMQQi JMS 
AND 
TAD 
DCA 

GENAOD, JMS 
AND 
AND 
TAD 
JMS 
JM» 
DCA 
TAD 
AND 
DCA 

GENINS, JMS 
JMS 
JMP 
JMS 
JMP 
DCA 
RDF 
TAD 
DCA 
TAD 
AND 
SNA 
JM» 

GENINDj JMS 
AND 
AND 
TAD 
JMS 
JMP 
JMS 
JMP 
JMS 
JM» 
JM» 



I ARANDY 
MDTMSK 
CONMDT 
I AOATAT 
I ARANDY 
ACDMSK 
CONACD 
I ADATAH 

I LNKSAV 
I ARANDY 
1QDMSK 
CONMOD 
I AMQDAT 
I ARANDY 
HGHLIM 
ADRMSK 
CONADR 
I ABNRYl 
GENAOD 
I AAODRS 
I AAODRS 
CONST1 
ASAVA 
I XGENTI 
I ABNRYl 
CONST1 
I ASAME1 
CONST1 
I AREFAD 

C6201 

I XRETHR 

I AINSTR 

6430 

CLA 

I ANTINO 
I ARANDY 
HGHLIM 
INDMSK 
CONIND 
I ABNRYl 
C0NST2 
I ASAME1 
C0NST2 
I ASAME2 
CONST2 
I ALOPID 



/GENERATE RANDOM MEMORY DATA FOR AND>DCA 
/MASK WORD FOR MEMORY OATA 
/CONSTRAINT WORD 
/SAVE IT 

/generate ranoom ac data 

/mask word 

/constraint word 

/Save the ac data word 

/move the link into ac bit 

/save the link 

/generate random mo oata 

/mask word for m3 data 

/constraint word for mq data 

/save the mq data word 

/generate random address for instruction 

/mask off address 81ts for this field 

/mask word for instruction address 

/constraint word 

/is it within limits 

/no, try again 

/this is the instructions aodress 



/SAVE PAGE BITS FOR FORMING REFERENCE ADDRESS 
/GENERATE RANDOM INSTRUCTION 
/IS IT WITHIN LIMITS 
/NO, TRY AGAIN 
/COMPARE TO ADDRS 

/THERE EQUAL OR TO CLOSE TRY AGAIN 
/STORE REFERENCE AODRESS 

/PUT CDF HOME FIELD INTO INSTRUCTION RETURN 
/ I NSTR = INSTRUCTION TO TEST 
/WAS INSTR INDIRECT 

/NO, NOT INDIRECT GO SETUP TEST CONDITIONS 

/GENERATE RANDOM INDIRECT ADDRESS 

/MASK OFF ADDRESS BITS FOR THIS FIELD 

/MASK WORD FOR INOIRECT ADDRESS 

/CONTRAINT WORD FOR INDIRECT 

/IS IT WITHIN BOUNDARIES 

/NO, TRY AGAIN 

/COMPARE TO ADDRS 

/TRY AGAIN 

/COMPARE TO REFAD 

/TRY AGAIN 

/GO SETUP TEST CONDITIONS 



1105 7600 

1106 1343 
110? 7640 
1110 5243 



/ 

CONST! , 



7600 

TAD CONFlG 
SZA CLA 
JMP GENAOD 
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1111 5295 

1112 1343 

1113 7710 

1114 5243 

1115 5272 



JMP GEN 1 NS 

/ 

C0NST2, T A3 CONFLG 
SPA CLA 
JM» GENADD 
JM» GENIND 



1116 


7510 


DECSWPf 


SPA 


1117 


5752 




JMP ] 1 


1123 


7650 




SNA 1 


1121 


5754 




JM» 1 i 


1122 


5753 




JM» 1 


1123 


6201 


/ 

C6231, 


6201 


1124 


0400 


A400, 


403 


1125 


0070 


K70, 


VS 


1126 


0011 


ADOHj 


11 


1127 


7777 


FLDMSK, 


7777 


1133 


0000 


CONFLD, 





1131 


7777 


AORMSK i 


7777 


1132 


0033 


CQNADR, 


3 


1133 


7777 


I NDMSKi 


7777 


1134 


0000 


CONIND, 





1135 


7777 


MOTMSKj 


7777 


1136 


0000 


CONMDT, 


3 


1137 


7777 


ACOMSK, 


7777 


1140 


0000 


CONACD. 




1141 


7777 


MQDMSK, 


7777 


1142 


0033 


CONMQD, 


3330 


1143 


0000 


CONFLG, 


3 


1144 


0000 


FLDLIM, 


3 


1145 


0000 


HGHLIH, 


3 


1146 


0003 


ASAVAi 


3 


114? 


0000 


ASAV9, 


3 




1150 


• 1150 




1153 


4751 


/ 

AlcHGi 


JMS I All 


1151 


0202 


/ 

AlRRNG j 


CHANGE 


1152 


0432 


FLDFGR, 


SFLDFG-1 


1153 


3433 


FLOFGF i 


SFlDFG 


1154 


2555 


CHK1KF, 


FLDCHK 


1155 


1601 


XGENTI , 


I NSGEN 


1156 


0754 


FLORAS. 


RANFLD 


1157 


1550 


XUPLIH, 


UPRLIM 


1163 


1551 


XBNOCNi 


3NDC0N 


1161 


1463 


ASA1E1, 


SAME1 


1162 


1473 


ASA1E2, 


SA^E2 


1163 


1401 


ARANOY , 


RANDY 


1164 


1435 


ABNRYli 


3NDRY1 


1165 


0510 


XRETHR, 


RETHS+4 


1166 


3745 


AADORS, 


A03RS 


1167 


2746 


A I NSTR i 


INSTR 



FLOFGR 
CLA 

CHK1KF 
FLOFGF 



/IS IT WITHIN F1EL0 LIMITS 

/NO, SET DIRECTION OF SWAP To REVERSE 

/WAS IT THE LAST FIELD? 

/GO CHECK TO SEE IF NEXT FIELD IS IK 

/NO, SET DIRECTION OF SWAP TO FORWARD 
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1173 
1171 
1172 
1173 
1174 
1175 
1176 
1177 



3747 
J751 
0752 
3753 
i>755 
3625 
0601 

0000 



AREFAD, REFAD 
4DATAT i DATATH 



ADATAH i 
AMQOAT , 
LNKSAV i 
A'JTIND, 
ALOPID, 



DATAHR 
1QDATA 
SAtfLNK 
N0T1ND 
LODPID 



1233 5347 



JH 3 BCHNG 



1231 
1232 
1233 
1204 
1205 
1236 
1237 
1210 
1211 
1212 
1213 
1214 
1215 
1216 
1217 
1220 
1221 
1222 

1223 
1224 
1229 
1226 
1227 
1230 
1231 
1232 
1233 

1234 
1235 
1236 
123? 
1243 
1241 
1242 
1243 
1244 
1245 
1246 
124? 



4755 
1775 
0776 
7041 
1772 
7640 
5313 
1760 
7041 
1761 
7640 
5313 
1763 
7041 
1762 
7640 
5313 
5765 

4755 
7340 
Z775 
1776 
7041 
1772 
7643 
5313 
5765 

7321 
1775 
7650 
7001 
4755 
1776 
7041 
1772 
7640 
5313 
1774 
3756 



ANDTST, JMS 
TAD 
AN3 
CIA 
TAD 

COMPARj SZA 
JM> 
TAD 
CIA 
TAD 
SZA 
JMP 
TAD 
CIA 
TAD 
SZA 
JM» 

JMP 

/ 

TADTST, JMS 
CLA 
AND 
TAD 
CIA 
TAD 
SiA 
JM = 
JM» 

/ 

ISHTST, CLA 
TAD 
SNA 
IAC 
JMS 
TAD 
CIA 
TAD 
SZA 
JMP 
TAD 
QCA 



! TSTPc 
I 8DATTH 
I BDATHR 

I DATFN 

CLA 

ERROR 

I L1NKSV 

I LiNKRT 
CLA 
ERROR 
I MQDAT 

I DONEMQ 

CLA 
ERROR 
I BLPCNT 

I TSTPC 
CLL CHA 
I BDATTH 
I BOATHR 

I DATFN 
CLA 
ERROR 
I BLPCNT 

CLL IAC 
I BDATTH 
CLA 

I TSTPC 
I BOATHR 

I DATFN 
CLA 
ERROR 
I 8REFAD 
I XBSAVA 



/GO ULTER 

/CHECK PC FROM RETURN 



/□ID AND WORK 
/RANDOM AND FAILED 

/CHECK TO SEE IF THE LINK CHANGED 



/ERROR, THE INSTRUCTION CHANGED THE LINK 
/CHECK TO SEE IF THE INSTH CHANGED THE MO 



/THE INSTRUCTION CHANGED THE MQ 



/CHECK PC FROM RETURN 



/SHOULD THE I SZ SKIP 
/YES 

/CHECK FOR CORRECT PC 



/did ac change on isz 

/ac failed on isz 

/get incremented data word 
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1250 
125i 
1252 
1255 
1254 

1255 
1256 
1257 
1260 
1261 
1262 
1263 
1264 
1263 
1266 

1267 
1270 
1271 
1272 
1273 
1274 
1275 
1276 
1277 
1330 
1301 
1302 
1333 

1304 
1335 
1306 
1337 
1310 



1311 
1312 



4757 
7041 
7001 
1775 
5206 

4755 
1774 
3756 
4757 
7041 
1776 
7640 
5313 
1772 
5206 

4755 
1776 
7041 
1772 
7640 
5313 
1774 
3756 
4757 
7041 
7001 
1766 
5206 

4755 
1776 
7041 
1772 
52B6 



t 

DCATSl 



1313 5342 

1314 1764 

1315 4336 

1316 1773 

1317 4336 

1320 1311 

1321 4336 

1322 1754 

1323 4336 

1324 1766 

1325 4336 

1326 1767 

1327 4336 
1333 1767 



JMS 
CI* 
IAC 
TAD 
JMP 

JMS 
TAD 
DC A 
JMS 
C!A 
TAD 
SZA 
JHP 
TAD 
JM» 



JMSTST, JMS 
TAD 

cn 

TAD 
SZA 
JM=> 
TAD 
DCA 
JMS 
CIA 
IAC 
TAD 
JM S 

/ 

JMPTST, JMS 
TAD 
CIA 
TAD 
JM° 

/ 

PDSAVE, 3 
C200, 203 



XCETWD 



I 3DATTH 
COMPAR 

i TSTPC 
I BREFAD 
I X8SAVA 
I XCETWD 

I BDATHR 
CLA 
ERROR 
I DATFN 
COMPAR 

I TSTPC 
I BDATHR 

I DATFN 
CUA 
ERROR 
I BREFAD 
I X8SAVA 
I XCETWD 



I 3ADDRS 
COMPAR 



I TSTPC 
I 30ATHR 



I DATFN 
COMPAR 



JM? LOOPSW 
TAD I XRNFLD 
JMS HALT 
TAD I XRETFL 
JMS HALT 
TAD PCSAVE 
JMS HALT 
TAD I RETURN 
JMS HALT 
TAD I BADORS 
JMS HALT 
TAD I FtNSTR 
JMS HALT 
TAD I FINSTR 



/DID ISH HARK 

/CHECK PC FROM RETURN 



/DID DCA WORK 

/OCA FAILED 

/DID AC CLEAR ON DCA 

/?? 

/CHECK PC FROM RETURN 



/DID JMS CHANGE AC 
/JMS CHANGED AC 



/DID JMS WORK 

/CHECK PC FROM RETURN 



/DID JMP AFFECT THE AC 



/CHECK SR0 TO I NH 1 9 J T ERROR HALT 
/FIELD THAT INSTRUCTION WAS PUT IN 
/PROGRAM RETURNED FROM THIS FIELD 
/EXPECTED PC RETURN 
/ACTUAL PC RETURN 
/INSTRUCTION ADDRESS 
/INSTRUCTION 
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1331 


0312 




AND 


C200 


1332 


7640 




SHA 


CLA 


1333 


1770 


ERRPSR, 


TAT 


I 2ASAVA 


1334 


1771 




TAD 


3 EASA VB 


.1335 


5753 




JMP 


1 XERROR 


1336 


0000 


/ 

HALT, 







1337 


7402 




HLT 




1343 


7230 




CLA 




1341 


5736 




JMP 


I HALT 



/GET REST OF ERROR INFORMATION 
/ERROR INFORMATION IN AC 



/INHIBIT ERROR HALT IF SR0 IS SET TO A ONE 



1342 
1343 
1344 
1345 



1353 
1351 
1352 
1353 
1354 
1355 
1356 
1357 
1360 
1361 
1362 
1363 
1364 
1365 
1366 
1367 
1370 
1371 
1372 
1373 
1374 
1375 
1376 
1377 



1751 
7700 
5314 
5752 

1347 



1347 4750 



.5202 
*)336 
0252 
1415 
0504 
2073 
2145 
2112 
0755 
2751 
2753 
3753 
3754 
0232 
0745 
3746 
1146 
1147 
0527 
0525 
0747 
0751 
0752 



1403 5362 

1401 0000 

1402 7301 

1403 1343 



TAD I SWRSAV/LAS 
SMA CLA 
JMP ERROR*! 
JMP I ERRRET 



BCHNG, JM3 I 3RERNG 



/CHECK THE SWITCH REGISTER 
/IS IT SET 

/NO, GO HALT ON ERROR WITH INFO IN AC 
/GO CHECK LOOP ON INSTRUCTION SWITCH 



/ 

BRERNG, 

SWRSAVi 

ERRRET, 

XERROR, 

RETURN, 

TSTPC, 

XBSAVA, 

XGETWO, 

LINKSV, 

LINKRT, 

OONEMO, 

MQOAT, 

XRNFLD, 

BLPCNT, 

BADORS , 

FINSTR, 

2ASAVA, 

HASAVBi 

DATFN, 

XRETFLi 

BREFAD, 

BDATTH, 

BDATHR, 

/ 

• 1400 



CHANGE 

SAVSWR 

LPCNT 

ER30R1 

RETHR 

»CTST 

3SAVA 

GETWD 

5AVLNK 

LIVKON 

MQDONE 

MODATA 

RANFLD 

LPCNT 

ADDRS 

I NSTR 

ASAVA 

ASAVB 

FI,ALL 

RETFLD 

REFAO 

DATATH 

DATAHR 



JMP CCHNG 
/ 

RANDY 1 

CLA CLL IAC 
TAD RANI 
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1404 
1435 
1436 
140? 
1410 
1411 
1412 
1413 
1414 



1344 
7106 
3343 
1344 
7012 
1343 
3344 
1344 
5601 



RANDYli 



TAD RAN2 
DLL. RTL 
OCA RANI 
TAD RAN2 
RTR 

T AO RANI 
OCA RAN2 
TAD RAN2 
JMP I RANOY 



1416 
1417 
1420 
1421 
1422 
1423 
1424 
1425 
1426 
142? 
1430 
1431 
1432 
1433 
1434 



3774 
1774 
4765 
1771 
4765 
1767 
4765 
1766 
0347 
7650 
5232 
1771 
3774 
1774 
3770 
5772 



I 
I 

ERROR1, 



DCA J CREFAD 
TAD I CREFAD 
JHS I XHALT 
TAD I ZINOAO 
JMS J XHAL.T 
TAO I CDATAT 
JMS I XHALT 
TAO I Z 1 NSTR 
AND C400 
SNA CLA 
JMP ,+3 
TAO I ZINDAD 
OCA I CREFAD 
TAD I CREFAD 



DCA 

JHP 



HBSAVA 
XERR2 



/REFERENCE ADDRESS 
/INDIRECT ADDRESS IF ANY 
/INITIAL MEMORY DATA 



/GO GET REST OF INFORMATION 



/THIS SECTION OF THE SUBROUTINE CHECKS FOR ILLEGAL ADDRESSES WHICH 
/ARE AS FOLLOWS100B0 - 0006 ANO UPPER TEST AREA LIMIT, -1 AND -2. 



1435 0000 

1436 3354 
143? 1354 

1440 1345 

1441 7100 

1442 1351 

1443 7630 

1444 5635 



1445 7346 

1446 1376 
144? 7041 

1450 1354 

1451 7510 

1452 5257 

1453 7161 

1454 1352 

1455 7620 

1456 5635 

1457 2235 



BMDRYli 3 



OCA CSAVB 
TAD CSAVB 
TAD MM7 
DLL 

TAD 3N0C0N 

SH. CIA 

JM» I 3NDRY1 



/GET THE NUMBER 
/SUBTRACT 7 FROM IT 
/CLEAR OUT THE LINK 

/ADD IN BOUNTRY CONST ANT»631 2 , 401 2 , 2012 , 3012 
/ILLEGAL ADDRESS, RETURN TO RANDOM NUMBER GENERATOR 



/THIS SECTION OF SUBROUTINE CHECKS FOH ILLEGAL AODRESS WHlCH ARE 
/THE PROGRAM AREA-3 TO PROGRAM END +1 



BNDOKli 



3N00K2. 



CLA CLL CMA RTL 

TAD PRGBG 

CIA 

TAD CSAV6 
SPA 

JMP 3ND0K2 
CIA STL 
TAD PRGSIZ 
SNu CLA 
JMP I 3N0RY1 
ISZ BNDRY1 
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1462 7340 

1461 0354 

1462 5635 



1463 
1464 
1465 
1466 
1467 
1470 
1471 
1472 

1473 
1474 
1475 
1476 
147? 
1500 
1501 
1502 

1503 
1504 
1505 
1506 
150? 
1510 
1511 
1512 
1513 
1514 
1515 
1516 
151? 
1523 
1521 



3003 
3355 
1775 
3353 
4303 
2263 
1355 
5663 

?000 
3355 
1774 
3353 
4303 
2273 
1355 
5673 



7344 
1355 
7041 
1353 
7510 
5320 
7161 
1356 
7620 
2303 
7420 
2303 
7300 
5703 



/ 

SAME1 i 



SAHE2, 



TSAMEi 



INSOKi 



CLA 
AND 
JMP 

DCA 
TAD 
DCA 
JMS 
ISZ 
TAD 
JMP 



OCA 
TAD 
DCA 
JMS 
ISZ 
TAD 
JM» 



CLA 
TAD 
CIA 
TAD 
SPA 
JMP 
CIA 
TAD 
SNL 
ISZ 
SNL 
ISZ 
CLA 
JM» 



CLL CMA 

CSAVB 

I BNORY1 



CSAVC 

I CADDRS 

CSAVA 

TSAME 

SAMEl 

CSAVC 

I SAMEl 



CSAVC 

I CREFAD 

CSAVA 

TSAME 

SAME2 

CSAVC 

1 SAME2 



CLL CMA RAL 
CSAVC 

CSAVA 

INSOK 

STL 

C5 

CLA 

TSAME 

TSAME 
CLL 

I TSAME 



1522 3000 

1523 1021 

1524 0346 

1525 7104 

1526 3350 
152? 1350 

1530 0360 

1531 3773 

1532 1350 

1533 0357 

1534 7112 
1533 7012 
1536 1361 
153? 3350 

1540 1020 

1541 3764 



LIMITS, 



Z 

TAO 
AN 3 
CLL 
DCA 
TAO 
ANO 
OCA 
TAO 
AND 
CLL 
RTR 
TAO 
DCA 
TAO 
DCA 



OP1SEL 

K37 

RAL 
UPRLIM 
UPRLIM 
C70 

I XFLDLM 

UPRLIM 

C7 

RTR 

C1777 
UPRLIM 
SWITCH 
I SAVE9W 



/GET MEMORY SIZE FROM HARDWARE CONFIGURATION 
/MASK OFF MERORY BITS 
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1342 


5722 




JMP I LIMITS 


1543 


1234 


/ 

RANI i 


1234 


1544 


5670 


RAN2. 


5670 


1545 


7771 


MM7 , 


• 7 


1546 


0037 


K37, 


37 


154? 


0400 


C400i 


400 


1550 


0000 


UPRLIM, 





1551 


0000 


BMDCONi 





1552 


3402 


PRGSIH, 


PR3END*4-B8N 


1533 


0000 


CSAVAf 


3 


1554 


0000 


CSAV3, 





1555 


0000 


CSAVCi 





1556 


0005 


C5, 


0035 


155? 


0007 


C7, 


7 


1560 


0070 


C70i 


70 


1561 


1777 


C1777, 


1777 




1562 


/ 

• 1562 




1562 


4763 


CCHNG, 


JMS I CRERNG 


1563 


0202 


/ 

CRERNGi 


CHANGE 


1564 


0336 


SAVESN, 


SAVSWR 


1565 


1336 


XHALT, 


HALT 


1566 


0746 


ZINSTR, 


I NSTR 


156? 


0751 


COATAT, 


OATATH 


1570 


2145 


ZBSAVA, 


gSAVA 


1571 


3750 


2 I NO AO i 


] NDAO 


1572 


0724 


X£RR2i 


ER30R2 


1573 


1144 


XFLDLMi 


FL 3L I M 


1574 


0747 


CREFAD, 


REFAO 


1575 


0745 


CADORS, 


A03RS 


1576 


,'200 


PRGBGi 


BGN 


157? 


0000 








/ROUTINE TO UlTER 



/RANDOM 0PERATE5-GROUP 1 
1600 »1600 

/ 

1600 5347 JM» PCHNG 



GR0UP2 - AND MQ OPERATES 



1601 
1602 
1603 
1604 
1605 
1606 
1607 



4755 
2242 
1243 
3754 
6201 
6224 



1613 1356 
1611 3612 



INSGEN, 

JMS I BRANDY 

AND INSHSK 

TA3 CONINS 

OCA I E 1 NSTR 
CD" 00 
RIF 



T A3 



/ROUTINE TO GENERATE A RANDOM INSTRUCTION! 

/GO GENERATE A RANOOM NUMBER 

/MASK WORD FOR INSTRUCTION 

/CONSTRAINT UORO FOR INSTRUCTION 

/SAVE THE INSTRUCTION 

/CHANGE DATA FIELD TO FIELD 

/READ THE INSTRUCTION FIELD 



START /GET THE STARTING ADDRESS 



OCA I A00RS5 /PUT FIELD AND START I NG ADDRESS INTO LOC 5 
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1612 


0005 


A3DRS5, 


STRFLD 


/ADDRESS 3 OF FlELO = STARTING ADDRESS AND 


1613 


6224 




RIP 




/READ THE INSTRUCTION FIELD 


1614 


1236 




TA3 


ADDRS5- 


4/GET THE CDF INSTRUCTION 


1615 


3216 




OCA 


.+1 


/PUT COF TO PROGRAM FIELD IN NEXT LOCATION 


1616 


7402 




HLT/COF 


/CHANGE OF BACK TO PROGRAM FIELD 


1617 


1754 




TA3 


I E I NSTR 


/CHECK TO SEE IF IT WAS A IOT 


1620 


3244 




AND 


K7000 




1621 


1245 




TA3 


M6000 




1622 


7453 




SNA 






1623 


5222 




JM» 


INSGEN+1 


/IT HAS A IOT REGENERATE A NEW INSTRUCTION 


1624 


1244 




TA3 


K7020 


/IS IT AN OPERATE INSTRUCTION 


1625 


7650 




SNA 


CLA 




1626 


5256 




JM 3 


OPRBGN 


/YES IT WAS AN OPERATE 


1627 


1351 




TA3 


MRIPNT 


/GET THE RETURN POINTER FOR MR I INSTRUCTIONS 


1633 


3753 




OCA 


I ZJMSRT 


/SAVE IT 


1631 


1734 




TAD 


I El NSTR 


/NOT A IOT OR OPERATE 


1632 


0246 




AN3 


K177 


/CREATE A REFERENCE AODRESS 


1633 


3761 




OCA 


I AASAVB 




1634 


1734 




TA3 


I £ I NSTR 


/GET THE I NSTR 


1635 


0247 




AND 


A200 


/PAGE HERO OR SAME PAGE 


1636 


7640 




S2A 


CLA 




163? 


1760 




TA3 


I AASAVA 




1640 


1761 




TAD 


I AASAVB 




1641 


5601 




JMP 


I INSGEN 


/RETURN AND CHECK IT 


1642 


7777 


INSMSKi 


7777 




1643 


3000 


CONINS, 








1644 


7000 


K7300, 


7030 




1645 


2000 


H6S30i 


-630 







1646 


0177 


K177, 


177 






164? 


0200 


A203. 


203 






1653 


0400 


9400. 


403 






1651 


0014 


A14, 


14 






1652 


7764 


NEG14, 


• 14 






1653 


0001 


Ali 


1 






1654 


0006 


BP6, 


6 






1653 


7721 


K7721, 


7721 






1656 


1352 


CPRBGNi 


T A3 


OPRPNT 


/GET THE RETURN POINTER FOR DPR INSTRUCTIONS 


1657 


3753 




OCA 


I 2 JMSRT 


/SAVE IT 


1660 


1754 




TAD 


I EI NSTR 




1661 


3230 




AN3 


B400 




1662 


7640 




SHA 


CLA 




1663 


3272 




JM° 


ILL0P2 




1664 


1754 


ILLOP1, 


TAD 


I EINSTR 


/OP1-CHECK BITS 8 AND 9 TO BE ON A ONE 


1663 


0231 




AJO 


A14 


1666 


1232 




TAD 


NEG14 




166? 


7630 




SNA 


CLA 




1670 


5202 




JMP 


INSGEN+1 /ILLEGAL "REGENERATE A NEW INSTRUCTION 


1671 


5306 




JMP 


ILLMO+3 


/GO SETUP RANDOM AC AND MQ DATA 


1672 


1754 


1L10P2, 


T A 3 


I EINSTR 


/IS THE I NSTR A MQ OR 0P2 INSTR 


1673 


3233 




AND 


Al 




1674 


7640 




SHA 


CLA 




1675 


5333 




JMP 


ILLMO 


/ 1 NSTR IS A MQ I NSTR CHECK FOR ILLEGAL INSTR 
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1676 
167? 
1700 
1701 
1702 



1734 
0234 
7440 
3202 
3306 



1703 1734 ILLMQi 

1704 0255 
1703 3734 

1706 1762 

1707 3763 

1710 1764 

1711 3765 

1712 1737 

1713 3766 

1714 7326 
1713 1773 

1716 3767 

1717 6214 

1720 1333 

1721 3774 

1722 1754 

1723 0250 

1724 7650 
1723 5770 
1726 1754 
172? 0253 

1730 7650 

1731 5771 

1732 5772 



TAD 
AND 
SHA 
JMP 

jnf 

TAD 
A NO 
OCA 

T A3 
OCA 
TAD 
OCA 
TAD 
DCA 
CLA 
TAD 
DCA 
RDF 
TAD 
DCA 
TAD 
AND 
SNA 
JM S 
TAD 
AND 
SNA 
JM» 
JMP 



EINSTR /IS THE INSTR A OSR OR HLT 
BP6 

IN8GEN*1 /INSTR IS A OSR^OR HLT REGENERATE 

ILLMQ+3 /CO SET UP SIMULATED A-C DATA AND MO 

EINSTR /GET THE INSTRUCTION 

K7721 /MASK OUT FOR LEGAL MQ INSTRUCTIONS 

EINSTR /AND SAVE IT 



XOATAH 

XSIMAC 

XSVLNK 

XSMLNK 

I NTMQD 

XSIMMQ 

CML RTL 

OADORS 

XEXPRT 

06201 

XRTOPF 

EINSTR 

B400 

CLA 

XSM0P1 

EINSTR 

Al 

CLA 

XSM0P2 

XSMMQI 



/PUT INITIAL WORD IN SIMULATED AC 

/PUT INITIAL LINK IN SIMULATED LINK 

/GET THE RANDOM MQ DATA 

/PUT INITIAL MQ DATA IN SJMULATEO MQ 

/SET UP INSTRUCTION RETURN POINTER 

/GET THE INSTRUCTION ADDRESS AND ADD 2 

/SET UP EXPECTED RETURN UNLESS A SKI P 

/READ THE OAT A FIELD 

/ADD IN THE COP INSTRUCTION 

/SET UP A LOC TO RETURN TO OWN DATA FIELD 

/IS THE INSTRUCTION A OPl OR 0P2 



/0P1 GO SIMULATE THE INSTRUCTION 
/IS THE INSTR A MQ INSTR 



/0P2- GO SIMULATE THE INSTRUCTION 
/MQ- GO SIMULATE THE MQ INSTR 



1733 


6201 


06231, 


6231 










1734 


1766 


/ 

0PERR1. 


TAD I 


XSIMMQ 


/GET THE 


SIMULATED 


MQ 


1735 


4341 




JMS 


HLTOPR 








1736 


1775 




TAD I 


GMQDON 


/GET THE 


FINAL MQ 




1737 


4341 




JMS 


HLTOPR 






LOOP ON INSTR 


1740 


5776 




JM° I 


GLPSW0 


/GO LOOK 


AT SR0 TO 


1741 


S030 


/ 

HLTQPR i 


3 










1742 


7402 




HLT 










1743 


7300 




CLA DLL 










1744 


5741 


/ 


JM S I 


HLTOPR 









1753 
1751 



1747 
4750 



3202 
2504 



/ 

»1747 
/ 

FCHNG, 
/ 

FRERNG, 
MR I PNT i 



JMS I FRERNG 



CHANGE 
RETHR 
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1752 


2675 


OPRPNT, 


3PRRET 


1753 


W776 


2JMSRT, 


JMSRET 


1754 


0746 


EINSTR, 


INSTR 


1755 


1401 


BRANDY, 


3ANDY 


1756 


3200 


START, 


8GN 


1757 


0753 


I NTMQD, 


HQDATA 


1760 


1146 


AASAVA, 


ASAVA 


1761 


1147 


AASAVB, 


ASAVB 


1762 


^752 


XDATAH, 


DATAHR 


1763 


2755 


XSIMAC, 


SIMAC 


1764 


£755 


XSVLNK, 


SAVLNK 


1765 


2756 


XSMLNK , 


SMLNK 


1766 


2757 


XSIMMQ, 


SI1MQ 


1767 


2754 


XEXPRT, 


EX'RET 


1770 


2001 


XSM0P1, 


SIM0P1 


1771 


2231 


XSM0P2. 


SH0P2 


1772 


2252 


XSMMQI , 


SIMMQI 


1773 


t>745 


OADORS, 


AQDRS 


1774 


2735 


XRTOPF, 


RETTDF 


1775 


2753 


GMQDON , 


MQDONE 


1776 


2737 


GLPSW0, 


LPSW2 


177? 


0000 


3 





/ 



2000 «2000 

/ 

2000 5347 JM 3 GCHNG 

/ 

/BEGINNING OF OPERATE GROUP ONE SIMULATION 



2001 


1762 


SIM0P1, TAD I 


CINSTR 


2002 


0271 


AND 


POS200 


2003 


7640 


SZA 


CLA 


2004 


3773 


DCA 


OSIMAC 


2003 


1762 


TAD 


CINSTR 


2006 


0267 


AND 


K100 


200? 


7640 


SHA 


CLA 


2010 


3774 


DCA 


OSMLNK 


2011 


1762 


TAD 


CINSTR 


2012 


3266 


AND 


K40 


2013 


7643 


SHA 


CLA 


2014 


4763 


JMS 


XSMCMA 


2015 


1762 


TAD 


CINSTR 


2016 


0265 


AND 


K20 


201? 


7640 


SHA 


CLA 


2020 


4764 


JMS 


XSMCML 


2021 


1762 


TAD 


CINSTR 


2022 


0261 


AND 


Kl 


2023 


7640 


SZA 


CLA 


2024 


4765 


JMS 


XSMIAC 


2325 


1762 


TAD 


CINSTR 


2026 


0262 


AND 


K2 


202? 


7640 


SHA 


CLA 



/get the instruction 

/is bit 4 set to clear the ac 

/yes, Clear out the simulated ac 

/get the instruction 

/is bit 5 set to clear the link 

/yes, clear the simulated link 

/get the instruction 

/is bit 6 set to complement the ac 

/yes go simulate a cma 
/get the instr 

/is bit 7 set fo complement the link 

/yes, go simulate a cml 

/get the instruction 

/is bit 11 set to increment the ac 

/yes go simulate iac 
/get the instruction 
/is bit 10 set to rtr or rtl 
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2030 


5242 




JHP 


SIMTWC 


/YES GO CHECK TO SEE WHICH ONE 


g03i 


1762 




TAP I 


CINSTR 


/GET THE INSTRUCTION 


2032 


0264 




AN3 


K14 


/IS IT A ROTATE LEFT OR RIGHT 


2033 


1272 




TAD 


NEG10 


/RAR? 


2034 


7490 




SNA 




s' 


2035 


4766 




JMS I 


XSMRAR 


/YES GO SIMULATE A ROTATE RIGHT 


2036 


1263 




TA3 


K4 


/NO.RAL? 


2037 


7690 




SNA 


CLA 




2040 


4767 




JMS I 


XSMRAL 


/YES > GO SIMULATE A ROTATE LEFT 


2041 


5294 




JNP 


OPRSET 


/GO TEST THE INSTRUCTION 


2042 


1762 


SlMTWCt 


TAD I 


CINSTR 


/GET THE INSTRUCTION 


2043 


0264 




AN3 


K14 


/BIT B AND 9 => 


2044 


7450 




SNA 






2043 


4770 




JMS I 


XSM8SW 


/YES, GO SIMULATE A 8YTE SWAP 


2046 


1272 




TAJ 


NEG10 


/RTR? 


204? 


7450 




SNA 






2050 


4771 




JMS 1 


XSMRTR 


/YESi GO SIMULATE A ROTATE TWICE RIGHT 


2051 


1263 




TA3 


K4 


/RTL7 


2052 


7650 




SNA 


CLA 




2053 


4772 




JMS I 


XSMRTL 


/YES . GO SIMULATE A ROTATE TWICE LEFT 


2054 


1776 


OPRSET, 


TAD I 


OFlELD 




2055 


1270 




TA3 


06201 




2056 


3297 




OCA 


i+l 




2057 


7402 




HLT/COF 




/CHANGE TO THE RANDOM DATA FIELD 


2060 


5775 




JM 3 I 


INTOPR 


/GO SETUP THE OPERATE INSTRUCTION 


2061 


3001 


Kli 


1 






2062 


3002 


K2i 


2 






2063 


0004 


Mi 


4 






2064 


0014 


Kl4< 


14 






2065 


0020 


K20. 


20 






2066 


0040 


K40i 


40 






2067 


3100 


K100i 


103 






2070 


6201 


06201. 


6231 






2071 


3200 


POS200, 


200 






2072 


7770 


NEGlDi 


.13 






2073 


3000 


/ 

PCTST, 


3 






2074 


7001 




IAD 






2075 


1754 




TA3 I 


XJMSLC 




2-076 


3755 




OCA I 


XPCSAV 




2077 


1755 




TA3 I 


XPCSAV 




2133 


7041 




CI A 






2101 


1756 




TA3 I 


XRETPC 




2132 


7640 




S2 A 


CLA 




2133 


5761 




JM 9 I 


uq t r B D 




2134 


1757 




TAD I 


FLOXRN 




2135 


7041 




CIA 






2106 


1760 




TAD I 


FLXRET 




2107 


7640 




SZA 


CLA 




2113 


5761 




JM B I 


MRIERR 




2111 


5673 




JM» I 


PCTST 
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2112 
2113 
2114 
2115 
2116 
2117 
2123 
2121 
2122 
2123 
2124 
2125 
2126 



3000 
1757 
1344 
3316 
7402 
1745 
3345 
6224 
1344 
3324 
7402 
1345 
5712 



/ 

GETWOj 



TAD I 

TAD 

OCA 

HLT/CDF 

TAD I 

DCA 

RIP 

TA3 

OCA 

HLT/CDF 
T A3 
JMP I 



FLOXRN 

A6231 

.+1 

3SAVA 
8SAVA 

A6201 
i +1 

BSAVA 
GETWD 



2127 
2130 
2131 
2132 
2133 
2134 
2135 
2136 



i!000 

1752 
7650 
5727 
1733 
7402 
7604 
5727 



RANCON. 



TA3 
SNA 
JM' 
TAD 
HLT 
LAS 
JM? 



HCNFLG 
CLA 

RANCON 
XWOMOV 



I RANCON 



2137 3000 

2140 1351 

2141 3743 

2142 5737 

2143 0003 



I NTSET , 



TINT, 



TAD 
DCA 
JM» 
INT 



XINT 
TINT 
INTSET 



2144 6201 A6201, 6221 

2145 0000 BSAVA, 





2147 


/ 

• 2147 




2147 


47S0 


/ 

GCHNG, 


JMS I 


2150 


0202 


/ 

GRERNG, 


CHANGE 


2151 


3102 


XINT, 


INTERS 


2132 


1143 


HCNFLG, 


CO^IFUG 


2153 


3573 


XWOMOV, 


MOVWDX 


2154 


0762 


XJMSLC, 


JMSLOC 


2155 


1311 


XPCSAV, 


PCSAVE 


2156 


0504 


XRETPC, 


RETHR 


2157 


0734 


FLDXRN, 


RANFLO 


216S 


0525 


FLXRET, 


RETFLD 


2161 


1313 


MRIERR, 


ERROR 


2162 


0746 


CINSTR, 


I NSTR 


2163 


2401 


XSHCMA, 


SI1CMA 


2164 


2426 


XSMCML, 


SItCML 
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2163 


2435 


XSMIACi 


SIMIAC 


2166 


2442 


XSMRARi 


SI SRAR 


216? 


2461 


XSMRALi 


SURAL 


2170 


2477 


XSMBSWi 


SIHBSW 


2171 


2520 


XSMRTRi 


SI "IRTR 


2172 


2537 


XSMRTLi 


SI1RTL 


2173 


2755 


OSIMAC. 


5 J SAC 


2174 


2736 


OSMLNK, 


S11LNK 


217S 


0637 


IMTOPRi 


OPSINT 


2176 


0754 


OF I ELD j 


RANFLD 


217? 


0000 




3 




2200 


• 2200 


i 


2200 


53«o 




JMP 
/ 



/BEGINNING OF OPERATE GROUP 2 SIMULATION 



2201 


3231 


S I M0P2 r 


OCA 


SKPFLG 


2202 


1745 


SMACHK« 


TAD 


OINSTR 


2203 


0243 




AND 


H100 


2204 


7650 




SNA 


CLA 


2205 


5211 




JMP 


SZACHK 


2206 


4746 




JMS 


XSHSHA 


2207 


5211 




JM° 


SZACHK 


2210 


5226 




JHP 


SETSKP 


2211 


1745 


SZACHK, 


TAD 


OINSTR 


2212 


0244 




AND 


Z40 


2213 


7650 




SNA 


CLA 


2214 


5220 




JM = 


SNLCHK 


2215 


4747 




JUS 


XSMSHA 


2216 


5220 




JM° 


SNLCHK 


2217 


5226 




JM» 


SETSKP 


2220 


1745 


SNLCHK, 


TAD 


OINSTR 


2221 


3245 




AND 


Z20 


2222 


7650 




SNA 


CLA 


2223 


5227 




JM» 


COMCHK 


2224 


4753 




JMS 


XSMSNL 


2225 


5227 




JH» 


COMCHK 


2226 


2251 


SETSKPi 


ise 


SKPFLG 


2227 


1745 


COMCHK, 


TAD 


OINSTR 


2233 


3250 




AND 


POSl? 


2231 


7640 




SZA 


CLA 


2232 


7240 




CLA 


CMA 


2233 


1231 




TAD 


SKPFLG 


2234 


7640 




SHA 


CLA 


2235 


2751 




182 


HEXPRT 


2236 


1745 




TAD 


OINSTR 


2237 


3246 




AND 


Z203 


2243 


7640 




SZA 


CLA 


2241 


3752 




OCA 


XACSIM 


2242 


5753 




JM = 


2SET0P 



/CLEAR THE SKIP FLAG 



/GO SETUP AND TEST IMSTR 
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2243 


,'100 


H103, 


133 


2244 


3040 


H40, 


40 


2245 


C'020 


Z20. 


20 


2246 


S200 


Z200, 


200 


2247 


3320 


Z323, 


323 


2253 


3010 


P0S13, 


10 


2251 


3033 


SKPFLG, 


3 



/BEGINNING OF OPERATE GROUP 2 MO INSTRUCTION SIMULATION 



2252 


1745 


SIMMQI , 


TAD 


OINSTR 


/GET 


THE INSTRUCTION 


2253 


3247 




AND 


H320 


/MASK OUT FOR LEGAL BITS 4,5 


2254 


7450 




SNA 








2255 


5753 




JMP 


ZSETOP 


/INSTRUCTION IS A NOP 


2256 


1304 




TAD 


NEG20 


/SUBTRACT 23 


2257 


7450 




SNA 








226S 


5754 




JM B 


XSMMQL 


/GO 


SIMULATE A MQL 


2261 


1305 




TAD 


M60 






2262 


7450 




SNA 








2263 


5755 




JM» 


XSMMOA 


/GO 


SIMULATE A M3A 


2264 


1304 




TAD 


NE520 






2265 


7450 




SNA 








2266 


5756 




JMP 


XSMSWP 


/GO 


SIMULATE A SWP 


2267 


1305 




TAD 


M60 






2270 


7453 




SNA 








2271 


5757 




JM> 


XSMCLA 


/GO 


SIMULATE A CLA 


2272 


1304 




TAD 


NEG20 






2273 


7450 




SNA 








2274 


5760 




JHP 


XSMCAM 


/GO 


SIMULATE A CAM 


2279 


1305 




TAD 


M60 






2276 


7450 




SNA 








2277 


5761 




JM=> 


XSMACL 


/GO 


SIMULATE A ACL 


2300 


1304 




TAD 


NEG20 






2301 


7650 




SNA 


CLA 






2332 


5762 




JMP 


XCLSWP 


/GO 


SIMULATE A SWP, CLA 


2303 


7402 




HLT 




/NONE OF THE ABOVE 


2304 


7760 


NEG20. 


• 20 








2309 


7720 


M60> 


ri?, 








2306 


1763 


/ 

ERROPR, 


TAD 


GRANFL 


/GET 


THE RANDOM DATA FIELD 


2307 


4764 




JMS 


OPRHLT 






2310 


1765 




TAD 


GOPRET 


/GET 


THE ACTUAL RETURN FIELD 


2311 


4764 




JMS 


OPRHLT 






2312 


1751 




TAD 


HEXPRT 


/GET 


THE EXPECTED RETURN PC 


2313 


4764 




JMS 


OPRHLT 






2314 


1766 




TAD 


GACTRT 


/GET 


THE ACTUAL RETURN PC 


2315 


4764 




JMS 


OPRHLT 






2316 


1767 




TAD 


GA0DR9 


/GET 


THE INSTRUCTION ADDRESS 


2317 


4764 




JMS 


OPRHLT 






2320 


1745 




TAD 


DINSTR 


/GET 


THE INSTRUCTION 


2321 


4764 




JMS 


OPRHLT 






2322 


1770 




TAD 


GQATAH 


/GET 


THE INITIAL AC DATA 


2323 


4764 




JMS 


OPRHLT 






2324 


1732 




TAD 


XACSIM 


/GET 


THE SIMULATED AC 
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2329 


4764 


JMS 


OPRHLT 








2326 


17/1 


TAD 


GDATAD 


/GET 


THE 


PINAL AC 


232? 


4764 


JMS 


OPRHUT 








2332 


1772 


TAD 


GSVLNK 


/GET 


THE 


INITIAL LINK 


2331 


4764 


JMS 


OPRHLT 








2332 


1 773 




f?GU| Ml/ 


/ uE. 1 


Tur 
i nt 




2333 


4764 


JMS 


OPRHLT 








2334 


1774 


TAD 


GLNKON 


/GET 


THE 


FINAL LINK 


2339 


4764 


JMS 


OPRHLT 








2336 


1775 


TAD 


GMUOAT 


/GET 


THE 


INITIAL HQ DATA 


233? 


4764 


JMS 


OPRHLT 








2340 


5776 


■ JMP 


OPRERl 









/ 





2343 


/ 

• 2343 
/ 




2343 


4744 


HCHNGi 


JMS I 


2344 


3202 


/ 

HRERNCi 


CHANGE 


2345 


0746 


OINSTR, 


INSTR 


2346 


2611 


XSMSMA, 


S I *1SMA 


2347 


2601 


XSMSZA, 


SI1SZA 


2350 


2626 


XSMSNL. 


SHSNL 


2351 


2754 


ZEXPRT, 


EX B RET 


2352 


2755 


XACSIM, 


SIMAC 


2353 


2054 


ZSETOPi 


OPRSET 


2354 


2640 


XSHMQLi 


SIIMQL 


2355 


2644 


XSMMQA i 


SIMM3A 


2356 


2652 


XSMSWP, 


SIMSWP 


2357 


2661 


XSMCLAi 


SIMCLA 


2363 


2663 


XSMCAM, 


SHCAM 


2361 


2666 


XSMACL. 


SIMACL 


2362 


2671 


XCLSWP, 


CLASUP 


2363 


0754 


GRANFL, 


RAVIFLD 


2364 


1741 


OPRHLT, 


HLTOPR 


2365 


2752 


GOPRET, 


OPRETF 


2366 


2675 


GACTRT i 


OPRRET 


2367 


2745 


GADORS, 


AODRS 


2370 


14752 


GDATAH, 


OATAHR 


2371 


2750 


GDATAD, 


DATAON 


2372 


0755 


GSVLNK , 


SAVLNK 


2373 


2756 


GSMLNK, 


SIMLNK 


2374 


2751 


GLNKDN, 


Ll-JKON 


2375 


0793 


GMQDAT, 


MQDATA 


2376 


1734 


OPRERl, 


0PERR1 


2377 


0000 




g 



2400 *2402 

/ 

2403 5367 JM C 



/ROUTINE TD SIMULATE A COMPLEMENT 
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2401 


0000 


SIMCMAi 






2402 


1224 


TAD 


H14 




2403 


3225 


DC A 


CNT 




2404 


3226 


DCA 


SIMCML 




2405 


1775 


TAD 


I BSIMAC 




2406 


7104 


CLL 


RAL 




2407 


3235 


DCA 


SIMIAC 




2410 


7420 


SNL 






241? 


2226 


ISZ 


SIMCML 




2411 


1226 


TAD 


SIMCML 




2413 


2225 


ISZ 


CNT 




2414 


5216 


JM = 


.*2 




2415 


5222 


JM? 


ENDCMA 




2416 


7104 


CLL 


RAL 




2417 


3226 


DCA 


SIMCML 




2420 


1235 


TAD 


SIMIAC 




2421 


5206 


JMP 


SIMCMA+5 


2422 


3775 


ENOCMA, DCA 


I BSIMAC 




2423 


5601 


JM» 


I SIMCMA 




2424 


7764 


114, -14 






2425 


0000 


CNTi 










/ROUTINE TD 


SIMULATE A 


CML 


2426 


0000 


SIMCMLi 3 






2427 


1776 


TAO 


I BSHLNK 


/GET THE SIMULATED LINK 


2433 


7650 


SNA 


CLA 


/IS IT A 


2431 


1234 


TAD 


K4000 


/YES, MAKE IT A ONE 


2432 


3776 


OCA 


I BSMLNK 


/SAVE IT 


2433 


5626 


JMP 


I SIMCML 




2434 


4000 


K4000, 4080 








/ROUTINE TD 


SIMULATE A 


I AC 


2435 


0000 


SIMIAC, 






2436 


2775 


ISZ 


I 8S I MAC 


/BUMP THE SIMULATED AC 


2437 


5241 


JMP 


,+2 




2443 


4226 


JMS 


SIMCML 




2441 


5635 


JM» 


I SIMIAC 








/ROUTINE TD 


SIMULATE A 


RAR 


2442 


0000 


SIMRAR. Z 




/CLEAR OUT A LtNK AND THE AC 


2443 


7300 


CLA 


CLL 


2444 


1776 


TAD 


I BSMLNK 


/GET THE SIMULATED LINK 


2445 


7004 


RAL 




/PUT IT IN THE LINK 


2446 


1260 


TAO 


NEG6 




2447 


3225 


DCA 


CNT 




2490 


1775 


TAD 


I BSIMAC 


/GET THE SIMULATED AC 


2451 


7006 


RTl 




/ROTATE 12 PLACES TO THE LEFT 


2452 


2225 


ISI 


CNT 




2453 


5291 


JMP 


• ■2 




2454 


3775 


DC* 


I BSIMAC 


/SAVE THE SIMULATED ROTATE 
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2459 


7010 


RAH 




/GET THE L'NK 


2456 


3776 


OCA 


BSHUNK 


/SAVE THE LINK 


2497 


5642 


JMP 


SIHRAR 


/RETURN 


2460 


7772 


NEG6 > .6 




s' 






/ROUTINE T3 S 


MULATE A 


RAL 


246i 


3000 


SIMRAL, 






2462 


7300 


CLA 


CLL 




2463 


1776 


TA3 


BSMLNK 


/GET THE SIMULATED LINK 


2464 


7004 


RAl 




/PUT IT IN THE LINK 


2469 


1260 


TAD 


NEG6 




2466 


3225 


OCA 


CNT 




2467 


1775 


TAD 


BSIMAC 


/GET THE SIMULATED AC 


2473 


7012 


RTR 




/ROTATE IT RIGHT 12 TIMES 


2471 


2225 


[S3 


CNT 




2472 


5273 


JM» 


,-2 




2473 


3775 


OCA 


8S IMAC 


/SAVE THE SIMULATED ROTATE 


2474 


7010 


RAR 






2479 


3776 


OCA 


BSMLNK 


/SAVE THE SIMULATED LINK 


2476 


5661 


JMP 


SIMRAL 


/RETURN 






/ROUTINE TO S 


MULATE A 


BYTE SWAP 


2477 


0033 


SIHBSW, 






2530 


7330 


CLA 


CLL 




2531 


1776 


ta: 


BSMLNK 


/GET THE SIMULATED LINK 


2532 


7013 


RAR 






2533 


7012 


RTR 






2534 


7012 


RTR 






2535 


1775 


TA3 


BSIMAC 


/GET THE SIMULATED AC 


2536 


3317 


AN3 


K7730 




2537 


1775 


TA3 


BSIMAC 


/GET IT AGAIN 


2513 


7036 


RTL. 






2511 


7036 








2512 


7006 


RTL 






2513 


3775 


OCA 


BSIMAC 


/SAVE THE SIMULATED BYTE Sk 


2514 


7010 


RAR 






2515 


3776 


OCA 


BSMLNK 


/SAVE THE LINK 


2516 


5677 


JM» 


SIM3SW 


/RETURN 


2517 


7700 


K7700. 7733 










/ROUTINE T3 S 


MULATE RTR 


2523 


3000 


SIMRTR, 3 






2521 


7300 


CLA 


CLL 




2522 


1776 


TA3 


BSMLNK 


/GET THE SIMULATED LINK 


2523 


7004 


RAi. 




/PUT IT IN THE LINK 


2524 


1336 


TA3 


MIS 




2525 


3225 


OCA 


CNT 


/SETUP A COUNTER FOR 11 RAL 


2526 


1775 


TA3 


BSIMAC 


/GET THE SIMULATED AC 


2527 


7004 


RAL 






2533 


2225 


ISH 


CNT 





PDP- 


8A PROCESSOR EXERCISER 


PAH3 


Vl42 21-0EC-74 14:34 


2531 


5327 




JM° 


, -2 




2532 


3775 




OCA I 


BSIMAC 


/SAVE THE SIMULATED ROTATED AC 


2533 


7010 




RA3 






2534 


3776 




OCA I 


BSMLNK 


/SAVE THE SIMULATED LINK 


2535 


5720 




JM= I 


SIMRTR 


/RETURN 


2536 


7765 


HIS, 


.13 










/ROUTINE TO SIMULATE RTL 


2537 


3003 


SIMRTL. 


2 






2540 


7330 




CLA 


CLL 




2541 


1776 




TA3 I 


BSMLNK 


/GET THE SIMULATED LINK 


2542 


7004 




RA. 




/AND PUT IT IN THE LINK 


2543 


1336 




TA3 


M13 




2544 


3225 




OCA 


CNT 


/SET UP A COUNTER TO DO 11 RAR'S 


2545 


1775 




TA3 I 


BSIMAC 


/GET THE SIMULATED AC 


2546 


7313 




RAR 






2547 


2225 




IS2 


CNT 




2553 


5346 




JM 9 


.«z 




2551 


3775 




OCA I 


BSIMAC 


/SAVE THE SIMULATED ROTATED AC 


2552 


7010 




RA°? 






2553 


3776 




DCA I 


8SMLNK 


/SAVE THE SIMULATED ROTATED LINK 


2554 


5737 




JM° I 


SIMRTL 




2555 


1771 


/ 

FLOCHKi 


TA3 I 


UPPERL 


/IS THE LAST FIELD = IK 


2556 


1365 




TA3 


M1777 




2557 


7640 




SHA 


CLA 




2560 


5772 




JM 9 I 


TSFLOF 


/NO GO SWAP IT UP 


2561 


6224 




RIP 




/READ THE INSTRUCTION FIELD 


2562 


7640 




SZA 


CLA 


/IS IT EQUAL TO FIELD B 


2563 


5773 




JM> I 


TSWPDN 


/NO, GO SWAP THE PROGRAM DOWN 


2564 


5774 




JMP I 


ROLFLG 


/YES, DO NOT SWAP FIELDS 3UT ROLL 


2569 


6001 


/ 

M1777, 


.1777 








2567 


/ 

• 2567 
/ 








256? 


4770 


ICHNGi 
/ 


JMS I 


I RERNG 




2570 


0202 


IRERNGi 


CHANGE 






2571 


1590 


UPPERL. 


'JPRLIM 






2572 


3433 


TSFLDF, 


SFLOFG 






2973 


0422 


TSWPDN, 


SWAPON 






2574 


0327 


ROLFLG, 


SETFLG 






2575 


2755 


BSIMACi 


SIMAC 






2576 


2796 


BSMLNK, 


SIMLNK 






2577 


3000 


/ 


3 








2600 


• 2603 
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2600 


9364 


JMP 

/ 


JCHNG 








/ROUTINE T3 


SIMULATE A 


S2A f 


2601 


0000 


SIHSZAi 






2602 


7240 


CIA 


CHA 




26(33 


1770 


TAD 


I CSIMAC 




2604 


3223 


DCA 


ACUTST 




2603 


2223 


ISZ 


ACUTST 




2606 


5601 


JM° 


I SIMSZA 




260? 


2201 


ISZ 


SIMSZA 




2610 


5601 


JM B 


I SIMSZA 








/ROUTINE TO 


SIMULATE A 


SMA 


2611 


0000 


SIMSMAi 3 






2612 


1770 


TA3 


I CSIMAC 




2613 


0225 


AN3 


04000 




2614 


1224 


TAO 


K7777 




2615 


3223 


DCA 


ACUTST 




2616 


2223 


ISZ 


ACUTST 




261? 


5221 


JMP 


.+2 




2620 


5611 


JM = 


I SIMSMA 




2621 


2211 


ISZ 


SIMSMA 




2622 


5611 


JH» 


I SIMSMA 




2623 


U003 


ACUTST, 






2624 


7777 


K7777, -1 






2625 


4000 


040001 4030 








/ROUTINE TO 


SIMULATE A 




2626 


0000 


SIMSNLf 






262? 


1771 


TA3 


I CSMLNK 




2633 


3225 


AND 


04000 




2631 


1224 


TAD 


K7777 




2632 


3223 


OCA 


ACUTST 




2633 


2223 


ISZ 


ACUTST 




2634 


5236 


JM» 


,+2 




2635 


5626 


JH= 


I SIMSNL 




2636 


2226 


ISZ 


SIMSNL 




263? 


5626 


JM» 


I SIMSNL 








/ROUTINE TO 


SIMULATE A 


MQL 


2640 


1770 


SIMMQL. TA3 


I CSIMAC 


/GET THE SIMULATED AC 


2641 


3772 


DCA 


I CSIMMQ 


/PUT IT IN THE SIMULATED MO 


2642 


3770 


DCA 


I CSIMAC 


/CLEAR OUT THE SIMULATED AC 


2643 


5773 


JMP 


I COPRST 


/GO EXECUTE THE INSTRUCTION 






/ROUTINE TO 


SIMULATE MQA 


2644 


1772 


SIMMQAi TAD 


I CSIMMQ 


/GET THE SIMULATED MO 


2615 


7040 


CM A 




/COMPLEMENT THE RESULTS 



/2K TO 32K P0P-8A PROCESSOR EXERCISER PAL10 V142 
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2646 


0770 


AND 


I CSIMAC 


2647 


1772 


TAD 


I CSIMMQ 


2650 


3770 


OCA 


I CSIMAC 


2651 


5773 


JMP 


I COPRST 






/ROUTINE TO 


SIMULATE A 


2632 


1770 


SIMSWP, TA3 


I CSIMAC 


2653 


3223 


OCA 


ACUTST 


2654 


1772 


TAD 


I CSIMMQ 


2655 


3770 


DCA 


I CSIMAC 


2656 


1223 


TAD 


ACUTST 


2657 


3772 


OCA 


I CSIMMQ 


2663 


5773 


JM 9 


I COPRST 






/ROUTINE TO 


SIMULATE A 


2661 


3770 


SIMCLA. DCA 


I CSIMAC 


2662 


5773 


JMP 


I COPRST 






/ROUTINE TO 


SIMULATE A 


2663 


3770 


SIMCAM, DCA 


I CSIMAC 


2664 


3772 


OCA 


I CSIMMQ 


2665 


5773 


JM» 


I COPRST 






/ROUTINE TO 


SIMULATE A 


2666 


1772 


SIMACL. TAD 


I CSIMMQ 


266? 


3770 


OCA 


I CSIMAC 


2670 


5773 


JMP 


I COPRST 






/ROUTINE TO 


SIMULATE A 


2671 


1772 


CLASWP, TAD 


I CSIMMQ 


2672 


3770 


DCA 


I CSIMAC 


2673 


3772 


DCA 


I CSIMMQ 


2674 


5773 


JMP 


I COPRST 


2675 


0000 


/ 

OPRRET, 




2676 


3350 


DCA 


OATAON 


267? 


7010 


RAR 




2700 


3391 


OCA 


LINKDN 


2701 


6214 


HDP 




2702 


33S2 


DCA 


OPRETF 


2703 


7701 


ACL 




2704 


3393 


OCA 


HQOONE 


2709 


7402 


RETTOF, HLT/CDF 


2706 


1775 


OPRCOM, TAD 


I XFIELO 


270? 


7041 


CIA 




2710 


1392 


TAO 


OPRETF 


2711 


7640 


S2A 


CLA 


2712 


9344 


JMP 


OPRERR 


2715 


1394 


TAO 


EXPRET 



/MASK RESULTS WITH SIMULATED AC 
/INCLUSIVE OR THE SIMULATED MQ 
/THE SIMULATED AC = INCLUSIVE OR OF MQ 8 AC 
/GO EXECUTE THE INSTR. 

SUP 

/GET THE SIMULATED AC 

/AND SAVE IT 

/GET THE SIMULATED MQ 

/AND PUT IT IN THE SIMULATED AC 

/GET THE SIMULATED AC 

/AND PUT IT IN THE SIMULATED MO 

/GO EXECUTE THE INSTRUCTION 

CLA 

/CLEAR THE SIMULATED AC 
/GO EXECUTE THE INSTRUCTION 



/CLEAR THE SIMULATED AC 
/CLEAR THE SIMULATED MQ 
/GO EXECUTE THE INSTRUCTION 

ACL 

/GET THE SIMULATED MQ 

/PUT IT IN THE SIMULATED AC 

/GO EXECUTE THE INSTR 

CLAiSWP 

/GET THE SIMULATED MQ 
/PUT IT IN THE SIMULATEO AC 
/CLEAR THE SIMULATED MQ 
/GO EXECUTE THE INSTRUCTION 



/RETURN HERE FROM OPERATE INSTRUCTION 
/SAVE THE FINAL AC 

/SAVE THE FINAL LINK 

/GET THE RANDOM DATA FIELD 

/SAVE THE DF FROM OPERATE RETURN 

/GET THE FINAL MQ DATA 

/SAVE IT 

/CHANGE OF SACK TO PROGRAM FIELD 
/GET THE EXPECTED INSTRUCTION FIELD 

/GET THE FIELD INSTRUCTION RETURNED FROM 

/PROGRAM RETURNED FROM THE WRONG FIELD 
/GET THE EXPECtED RETURN PC 
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2714 


7041 




CIA 






2713 


1275 




TAD 


OPRRE? 


/GET THE ACTUAL RETURN PC 


2716 


7640 




SZA 


CLA 




271? 


5344 




JM» 


OPRERR 


/EXPECTED PC DOES NOT AGREE WITH ACTUAL 


2720 


1337 




T A '.'! 


SIMMQ 


/GET THE SIMULATED MO' 


2721 


7041 




CIA 






2722 


1333 




TA3 


MQDONE 


/GET THE ACTUAL MO 


2723 


7640 




SZA 


CLA 




2724 


3344 




JM» 


OPRERR 


/ERROR, ACTUAL MQ DOES NOT EQUAL SIMULATED MO 


2725 


1336 




TA3 


SIMLNK 


/GET THE SIMULATED LINK 


2726 


7041 




CIA 






272* 


1331 




T A 


LINKDN 


/GET THE ACTUAL LINK 


2730 


7640 




SZA 


CLA 




2731 


5344 




J^i 5 


OPRERR 


/ERROR SIMULATED AND ACTUAL LINK ARE NOT EQUAL 


2732 


1355 




TA3 


SIMAC 


/GET THE SIMULATED AC 


2733 


7041 




CIA 






2734 


1330 




TA3 


OATADN 


/GET THE ACTUAL AC RETURNED 


2733 


7640 






CLA 




2736 


3344 




JMP 


OPRERR 


/SAIMULATED AND ACTUAL AC DO NOT AGREE 


2737 


1766 


LPSW01 


TA3 I 


SRSAV/LAS /IS SHi SET TO LOOP ON THE INSTRUCTION 


2740 


7004 




RAu 






2741 


7710 




SPA 


CLA 




2742 


5774 




JM I 


XINSGN 


/YES GO LOOP ON THE INSTRUCTIN 


2743 


5776 




JMP I 


XXCNT 


/GO SUMP INSTRUCTION COUNTER 


2744 


1766 


OPRERR, 


TA3 I 


SRSAV/LAS /CHECK SR0=1 TO INHIBIT ERROR HALT 


2745 


7710 




SPA 


CLA 


/IS IT SET 


2746 


5337 




JMP 


LPSW0 


/YES, CHECK LOOP SWITCH 


2747 


5767 




JMP I 


OERROR 


/NO, GO HALT WITH ERROR INFORMATION IN AC 


2753 


0000 


DATADNi 









2751 


3000 


t | \\ 1/ |\ (J . 
L I In fS \J * g 








2752 


3000 


OPRETF, 









2753 


0000 











2754 


0000 


EXPRET, 









2755 


0000 


S I MAC , 









2756 


0000 


StMLNK, 









2757 


0000 


SIMMQ, 











2764 


/ 

a2764 








2764 


4765 


/ 

JCHNG i 


JMS I 


JRERNG 




2765 


13202 


/ 

JRERNG, 


CHANGE 






2766 


0336 


SRSAV, 


SAvSWR 






2767 


2306 


OERRORi 


ERROPR 






2770 


2755 


CSIMACi 


SI MAC 






2771 


2756 


CSMLNK i 


SIMLNK 






2772 


2757 


CSIMMQ, 


SIMMQ 






2773 


2054 


COPRST, 


OPRSET 






2774 


1606 


XINSGN, 


INSGEN+5 




2775 


0754 


XFIELO, 


RA*JFLO 






2776 


2271 


XXCNT, 


XC1T 






2777 


0000 




2 







/2K TO 32K PDP-8A PROCESSOR EXERCISER PAL10 
/ 

3000 03000 
/ 

3200 5346 JMP 
/ 

/ROUTINE TO 



3301 


1771 


FILRND, 


TA3 : 


( CONTLM 


3002 


3225 




OCA 


TEMP 


3003 


1772 




TA3 : 


[ FLOCNT 


3024 


7633 




SNA 


CLA 


3035 


1223 




TA3 


MM4 


3336 


1373 




TA3 


ABGN 


3037 


7041 




CIA 




3013 


3771 




OCA : 


1 CONTLM 


3011 


1772 




TA3 I 


1 FLDCNT 


3312 


7630 




SNA 


CLA 


3013 


122« 




TA3 


KKK4 


3014 


4774 




JMS 1 


1 ZF ILL 


3015 


1225 




TAD 


TEMP 


3016 


1375 




TA3 


ENOOFP 


3017 


3771 




DCA ] 


! CONTLM 


3023 


1375 




TA3 


ENOOFP 


3021 


4774 




JMS ] 


: ZF1LL 


3022 


5776 




JM° ! 


; XADD1 


3023 


7774 


MM4, 


= 4 




3024 


0004 


KKK4. 


4 




3323 


3000 


TEMP , 
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WITH HALTS AROUND THE PROGRAM 

/GET THE UPPER LIMIT COUNTER 
/SAVE IT 

/CHECK TO SEE fF IT IS FIELD 
/IS IT FIELD 07 

/YES, SUBTRACT 4 FROM THE BEGINNING ADDRESS 

/NEGATE THE NUMBER FOR A COUNTER 
/SAVE IT 

/CHECK TO SEE IF IT IS FIELD 
/IS IT FIELD 

/YES, START FILLING FIELD AT ADDRESS 4 

/FILL THE FIRST HALF OF PROGRAM FIELD 

/GET THE UPPER LIMIT COUNTER 

/ADD END OF PROGRAM TO IT 

/SAVE THIS NUMBER AS THE COUNTER 

/GET THE ADDRESS TO START FILLING MEMORY 

/WITH HALTS 

/RETURN FOR NEXT FIELD 



KCHNG 

FILL MEMORY 



3026 


7240 


BGNCONi 


CLA 


CMA 


/CONSTRAINT STARTING ADDRESS 


3027 


3730 




DCA 


I XCNFLG 


/RANDOM STARTING ADDRESS 


3030 


4751 




JMS 


I XLIMIT 


/SETUP MEMORY LIMITS 


3031 


1021 




TA3 


0P1SEL 




3032 


3234 




OCA 


SELOPl 




3033 


5762 




JM» 


I CONSET 


/RETURN TO PROGRAM TO SETUP MASK AND CONSTRAINT 


3034 


0000 


SELOPl, 









3335 


0000 


SETOPli 


3 






3036 


1234 




TA3 


SELOPl 




3037 


7004 




RAL 




/CHECK TO SEE IF OPTION 1 WAS SELECTED 


3040 


7700 




SHA 


CLA 


/WAS IT ? 


J i 


5635 




JMP 


I SET0P1 


/NO , JUST RUN MR I AND OPR 


3042 


3301 




DCA 


KILL 




3043 


4732 




JMS 


I OPRAND 


/START SETTING UP OPTION 1 


3044 


2300 




AND 


KK377 


/MASK BITS 4-11 


3043 


3733 




DCA 


I SLUXMT 


/SAVE THE RANDOM NUMBER FOR SLU 


3046 


4732 




JMS 


I OPRAND 


/GENERATE A RANDOM NUMBER FOR PARALLEL I/O 


3047 


3734 




DCA 


I PIOXMT 


/SAVE THE WORD FOR THE PARALLEL I/O 


3050 


7240 




CLA 


CMA 


/SET ALL PROGRAM FLAGS TO INACTIVE STATE 


3051 


3755 




DCA 


I FLGXMT 


/SLU XMIT FLAG 


3052 


7240 




CLA 


CMA 




3053 


3736 




DCA 


I FLGREC 


/SLU RECEIVE FLAG 



32K P0P.8A PROCESSOR EXERCISER 


PAL10 


3054 


7240 




CLA 


CHA 


3059 


3757 




□ I'M 1 


FLQPIO 


3096 


7240 




CLA 


CMA 


305? 


3760 




OCA I 


FLSRTC 


3060 


127/ 




TAD 


MM55 


3061 


3761 




OCA I 


DVINAC 


3062 


7301 




CLA CLL 


IAC 


3063 


6035 




K I C 




3064 


6135 




CLLE 






/ 3010 




CLA 


CLL 


sj o w 






DBSE 




306? 


1753 




TAO I 


SLUXMT 


3070 


6046 




TLS 






1 CI00 




CLA 




3072 






r AO I 


PIOXMT 


3073 


6574 




D8T0 




3074 


7301 




CLA CLL 


IAC 


307S 


3763 




OCA I 


PI OROY 


3076 


5635 




JMP I 


SETOPl 


307? 


7723 


MM55, 


.55 




3100 


0377 


KK377, 


377 




3101 


0000 


KILL. 


3 
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/PARALLEL I/O PLAG 

/REAL TIME CLOCK PCAG 

/SETUP A DEVICE INACTIVE COUNTER 
/SET DATA 11 TO A ONE 
/SET SLU INTERRUPT ENABLE 
/SET RTC INTERRUPT ENABLE 

/SET PARALLEL I/O INT ENABLE 

/GET THE WORD TO BE TRANSMITTED BY SLU 

/CLEAR XMIT FLAG AND TRANSMIT WORD 

/GET THE WORD TO BE TRANSMITTED BY PARALLEL I/O 
/TRANSMIT IT 

/SET A PROGRAM FLAG TO SIGNIFY TO RTC WHEN 
/TO TRANSMIT ANOTHER CHARACTER ON PARALLEL I/O 
/RETURN TO PROGRAM 



/INTERRUPT SERVICE ROUTINE 



3102 


3341 


INTERS 


DCA 


INTAC 


/SAVE THE AC 


3103 


7010 




RAR 




/GET THE LINK INTO BIT 


3104 


3342 




DCA 


INTLNK 


/SAVE THE LINK 


3105 


1743 




TAD I 


ADDRS0 


/GET THE INTERRUPT PC 


3106 


3344 




OCA 


INTRET 


/SAVE IT 


3107 


6224 




RIF 




/READ THE INSTRUCTION FIELD 


3110 


1345 




TAD 


KKCDF 


/ADD CDF INSTRUCTION TO BITS 6-8 


3111 


3312 




OCA 


, +1 


/PUT CDF TO PROGRAM FIELD IN NEXT LOCATION 


3112 


7402 




HIT/CDF 




/TO PROGRAM FJELD 


3113 


6041 




TSF 




/SKIP ON SLU XMIT FLAG 


3114 


7410 




SK» 




3115 


5765 




JM 3 I 


SERXMT 


/GO SERVICE SLU XMIT FLAG 


3116 


6031 




KSF 




/SKIP ON SLU RECEIVE FLAG 


3117 


7410 




SKP 




3120 


5766 




JM? I 


SERREC 


/GO SERVICE SLU RECEIVE FLAG 


3121 


6571 




DBSK 




/SKIP ON PARALLEL I/O DATA READY FLAG 


3122 


7410 




SK a 




3123 


5767 




JM» I 


SERPIO 


/GO SERVICE PARALLEL I/O 


3124 


6137 




CL3K 




/SKIP ON REAL TIME CLOCK FLAG 


3125 


7410 




SK» 






3126 


5770 




JM 3 I 


SERRTC 


/GO SERVICE REAL TIME CLOCK FLAG 


3127 


6102 




SPu 




/SKIP ON AC LOW F/F 


3130 


7410 




SK» 






3131 


5764 




JM» I 


POWERF 


/POWER FAILURE GO CLEAR AC LOW AND RETURN 


3132 


7402 




HLT 




/ILLEGAL INTERRUPT 


3133 


1342 


RETPRG, 


TAD 


INTLNK 


/GET THE LINK 


3134 


7104 




CLL 


RAL 


/RESTORE IT 


3135 


1341 




TAD 


INTAC 


/RESTORE THE AC 


3136 


6244 




RMF 




/RESTORE MEMORY FIELDS 
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3137 6001 ION /TURN THE INTERRUPT ON 

3140 5744 JMP I INTRET /RETURN TO PROGRAM 



3141 


2003 


I NT AC i 


a 


3142 


3000 


INTLNK, 


2 


3143 


3000 


ADDRS0I 





3144 


0000 


INTRET, 


a 


3145 


6201 


KKCDF, 


CDF 





3146 


/ 

• 3146 




3146 


4747 


/ 

KCHNG, 


JM3 I KRERNG 


3147 


3202 


/ 

KRERNG, 


CHANGE 


3153 


1143 


XCNFLG, 


CONFL.G 


3151 


1522 


XLIMIT, 


LMITS 


3152 


1401 


OPRANO, 


RANDY 


3153 


3232 


SLUXMT, 


XMTSLU 


3154 


3234 


PIOXMT, 


XMTPIO 


3155 


3226 


FLGXMT, 


XMTFLG 


3156 


3227 


FLGREC, 


SECFLG 


315? 


3230 


FLGPIO, 


PI3FLG 


3160 


3231 


FLGRTC, 


RTCFLG 


3161 


3337 


DVlNACi 


1NACDV 


3162 


3401 


CONSET, 


SETCON 


3163 


3254 


PIORDY, 


RDYPIO 


3164 


3304 


POWERF, 


POWFAL 


3165 


3201 


SERXMT, 


XMTSER 


3166 


3204 


SERREC, 


RECSER 


3167 


3237 


SERPIO, 


PIDSER 


3170 


3255 


SERRTC, 


RTCSER 


3171 


1145 


CQNTLM, 


HGHLJM 


3172 


0247 


FLOCNT, 


CNTR3 


3173 


0200 


ABGN, 


BGN 


3174 


0527 


2FILL, 


FI.ALL 


3175 


3576 


ENDOFP, 


PRSEND 


3176 


3436 


XAOD1. 


ADDONE 


317? 


0000 








3201 
3202 
3203 



3200 
5367 



3226 
6042 
5313 



• 3200 
/ 

JMP LCHNG 

/ 

/SERIAL LINE UNIT TRANSMIT SERVICE ROUTINE 

XMTSER, DCA XMTFLG 
TCF 

JMP CHKACT 



/SET SLU XMIT PLAG ACTIVE 
/CLEAR TRANSMIT" FLAG 
/CHECK ALL DEVfCES TO BE ACTIVE 



/SERIAL LINE UNIT RECEIVER SERVICE ROUtlNE 



3204 



3227 



RECSER, DCA RECFLG /SET SLU RECEIVER FLAG ACTIVE 



/2K TO 32K PDP-8A PROCESSOR EXERCISER 



PAL10 
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3203 


6036 




KR3 




/CLEAR RECIVE FLAG AND READ THE SUFFER 


3206 


3233 




DCA 


RECSIU 


/SAVE THE WORD 


3207 


1232 




TAD 


XMTSLU 


/COMPARE WORD TRANSMITTED WITH WORD READ 


3210 


7041 




CIA 






3211 


1233 




TAD 


RECSIU 




3212 


7640 




SZA 


CLA 


/ARE THEY EQUAL? 


3213 


7402 




HLT/JMP 


! PSRERR//OATA ERROR SLU 


3214 


1773 




TAD I 


KILLIT 




3213 


7640 




SHA 


CLA 




3216 


5271 




JK- 


OUT 


/KILL INTERRUPTS UNTIL RELOCATION OCSURS 


OCX' 






l '-' C 

jn 3 


RANDOM 


/GO GENERATE A NEW WORD 


3220 


0236 




AND 


CC377 


/MASK BITS 4.11 


322i 


3232 




DCA 


XMTSLU 


/SAVE WORO TO BE TRANSMITTED 


3222 


1232 




TAD 


XMTSLU 


/GET THE WORD 


3223 


6046 




TLS 




/TRANSMIT IT 


3224 


7300 




CUA 


CLL 




3223 


5313 




jmp 


CHKACT 


/CHECK ALL DEVICES TO BE ACTIVE 


3226 


0000 


XMTFLQi 


z 






322? 


0000 


RECFlOi 









3230 


0000 


PIOFLG, 









3231 


0000 


RTCFLG, 


a 






3232 


Z000 


XMTSLUi 









3233 


0000 


RECSLU, 









3234 


0000 


XMTPIO. 


3 






3233 


0000 


RECPIOi 









3236 


0377 


CC377, 


377 







3237 
3240 
3241 
3242 
3243 
3244 
3245 
3246 
3247 
3250 
3251 
3252 

3253 

3254 



3257 
3260 
3261 



3230 
6572 
6573 
3235 
6370 
7402 
1234 
7041 
1235 
7640 
7402 
3254 

5313 



3253 3231 
3256 6136 



7000 
1254 
7640 



3262 5313 



/PARALLEL I/O INTERRUPT SERVICE ROUTINE 

PIOSERi OCA PIOFLG /SET PARALLEL I/O ACTIVE FLAG 

DBRD /READ THE PARALLEL I/O BUFFER 

DBCF /CLEAR DATA READY FLAG SET DATA ACCEPTED 

DCA RECPIO /SAVE THE WORO READ 

DBST /SKIP AND CLEAR DATA ACCEPTED AND DATA AVAILABLE 

HLT/JMP I PSRERR/D8CF FAILED TO SET DATA ACCEPTED 

TAD XMTPIO /COMPARE THE WORD TRANSMITTED WITH THE WORD READ 

CIA 

TAD RECPIO 

SHA CLA /ARE THEY EQUAL? 

HLT/JMP 1 PSRERR/NO. DATA ERROR PARALLEL I/O 

DCA RDYPIO /SET A PROGRAM FLAG TO SIGNIFY TO RTC, THAT 

/A NEW WORD IS NEEDED FOR PARALLEL I/O 
JM» CHKACT /CHECK ALL DEVICES To BE ACTIVE 

RDYPIOi 

/REAL TIME CLOCK INTERRUPT SERVICE ROUTINE 

RTCSER i DCA RTCFLG /SET REAL TIME CLOCK FLAG TO ACTIVE 

CLDL /CLEAR CLOCK FLAG 

NOVJMS I ACTLIN/ THIS LOCATION USED IF ACT LINE AND OPTION l SELECTED 
TAD RDYPIO /GET PARALLEL I/O STATUS 

S2A CLA /TRANSMIT ANOTHER WORD? 

JM» CHKACT /NO, MUST BE INACTIVE GO CHECK ALL DEVICES 



32K POP- 


8A PROCESSOR EXERCISER 


PAL10 


V142 21-DEC-74 14134 PAGE 


3263 


2254 




IS? 


RDYPIO 


/SET PROGRAM FLAG TO INACTIVE 


3264 


1773 




TAD I 


K ILL IT 


/GET THE KILL FLAG 


3265 


7650 




SNA 


CLA 


/WAS IT SET 


3266 


5275 




JM? 


OUT + 4 


/NO CONTINUE RUNNING 


3267 


6135 




CL^E 




/YES - CLEAR RTC AND P I/O I NT ENA 


3270 


6576 




OB3E 






3271 


2303 


OUT, 


JS2 


CNTENO 




3272 


5776 




JM» I 


PRGRET 


/WAIT FOR NEXT INTERRUPT 


3273 


6002 




IOF 




/TURN THE INTERUPT OFF 


3274 


5774 




JM» I 


RELGO 


/RETURN TO PROGRAM FOR RELOCATION OR 1 


3275 


4341 




JMS 


RANDOM 


/GENERATE A NEW WORD FOR PARALLEL I/O 


3276 


3234 




DCA 


XMTPIO 


/SAVE IT 


3277 


1234 




TAD 


XMTPIO 


/GET THE NEW WORD 


3300 


6574 




DBTD 




/TRANSMIT IT 


3301 


7300 




CLA 


CLL 




3302 


5313 




JM? 


CHKACT 


/CHECK OTHER DEVICES TO BE ACTIVE 


3303 


0000 


CNTENDi 













/POWER 


FAIL INTERRUPT SERVICE ROUTINE 


3304 


6103 


POWFALi 


CAL 




/CLEAR AC LOW F/F 


3303 


6102 




SPL 




/SKIP ON AC LOW AS A LEVEL 


3306 


7410 




SKP 






330? 


6101 




SBE 






3310 


7410 




SKP 






3311 


7402 




HLT 




/BATTERY EMPTY - ITS ALL OVER 


3312 


5776 




JMP 1 


PRORET 


/RETURN TO THE PROGRAM 


3313 


1226 


CHKACT, 


TAD 


XMTFLG 


/CHECK ALL DEVICES TO BE INTERRUPTING 


3314 


1227 




TAD 


RECFLG 




3515 


1231 




TAD 


RTCFLG 




3316 


1230 




TAD 


PIOFLG 




3317 


7630 




SNA 


CLA 


/ARE THEY ? 


3320 


5324 




JM = 


RESET 


/YES, RESET ALL. FLAGS TO INACTIVE 


3321 


2337 




IS! 


INACDV 


/BUMP INACTIVE COUNTER 


3322 


5776 




JMP I 


PRGRET 


/RETURN TO THE PROGRAM 


3323 


7402 




HLT/JMP 


I PSRERR/ONE OR MORE DEVICES ARE INACTIVE 


3324 


7340 


RESET, 


CLA CLL 


CMA 


/SET ALL DEVICES TO INACTIVE 


3325 


3226 




DCA 


XMTFLG 




3326 


7240 




CLA 


CMA 




332? 


3227 




OCA 


RECFLG 




3330 


7240 




CLA 


CMA 




3331 


3230 




DCA 


PIOFLG 




3332 


7240 




CLA 


CMA 




3333 


3231 




DC* 


RTCFLG 




3334 


1340 




TAD 


MMM55 




3335 


3337 




DCA 


INACDV 


/RESET INACTIVE COUNTER 


3336 


5776 




JMP I 


PRGRET 


/RETURN TO THE PROGRAM 



333? 0000 



INACDV, 
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3341 0000 

3342 7301 

3343 1355 

3344 1356 

3345 7106 

3346 3355 
334? 1356 

3350 7012 

3351 1355 

3352 3356 

3353 1356 

3354 5741 



RANDOM, 

CLA 
TAB 
TAD 
CU 
DC A 
AO 
RT* 
T A3 
OCA 
TA3 



RANN1 

RANN2 

RTL 

RANN1 

RANN2 

RANN1 
RANN2 
RANN2 
RANDOM 



3355 
3356 

3357 
3360 
3361 
3362 
3363 
3364 
3365 



1234 
5670 



1775 
7004 
7700 
5757 
2773 
5365 



RANN1, 
RANN2, 



WA I TEN i 



12S4 
5670 



I > 3 
RAL 
SMA 
JM° 
!SH 
JMP 



CLA 

WA 1 TEN 
XILLIT 



/WAS OPTION 1 SELECTED 



/NO i RETURN TO RELOCATION 

/WAIT FO.R DEVICES TO BECOME IN ACTIVE 



336? 4770 

3373 0202 

3371 1333 

3372 1320 

3373 3101 

3374 0274 

3375 3034 

3376 3133 



03367 
/ 



JMS I LRERNG 



LOHN 
/ 

LRERNG, CHANGE 

PSRERR.- ER3PSR 
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/ 
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/ 
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7650 
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7041 
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3713 
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I ZHIGH 
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3452 


6224 
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7041 
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3454 
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7650 
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3463 


3713 
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3501 


1316 
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3502 
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3505 
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3514 


3527 


XT IUL » 


F I UALU 


3515 


3001 


XFLRNQ i 
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35l6 
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TAD PRGBGN 
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3374 
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/ADDRESS Of SWAP ROUTINE 
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7041 
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/COMPARE ERROR DURING RELOCATION 
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2373 
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3567 


2374 
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2347 
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UPOWN 




3571 
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5744 
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3573 
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MOVWDX, 








3574 


0000 
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3575 
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BGM- 
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2200 


• 200 
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/ 
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TAD 


OPISEL 
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RA. 




/PUT 0PT0N1 BIT IN BIT 
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7730 




SMA 


CLA 


/IS OPTION 1 SELECTED? 
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5233 




JM = 


SLOWRN 


/NO, OVERLAV SECTIONS OF RANOY ANO ERR0R1 


3634 


1276 




TAD 


K4772 


/YES, SET UP A TALK LOOP TO =>RDM 


3605 


3677 
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I 0P1HN0 
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1300 
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AUTO10 
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ERR0R5 




3611 
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DCA 
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1250 




TAD 


MM20 




3613 


3145 




DCA 


PATHOV 




3614 


1410 




TAD 


I AUTO10 




3615 


3411 
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3616 
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iSi 


PATHOV 




3617 


5214 




JMP 


.-3 




3620 


1275 




TAD 
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3621 


3651 
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3622 


1275 




TAD 


R5771 




3623 


3652 
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3624 


1275 




TAD 


R5771 




3625 


3653 
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I 0VR3 




3626 


1275 




ta: 


R5771 




3627 


3653 




DCA 


I 0VR3 




3630 


1275 




TAD 


R5771 




3631 


3654 




DCA 


I 0VR4 




3632 


5423 




.IMP 


I PATCH 








/THIS SECTION OF CODE WILL OVERLAY LAST 2 LOCATIONS OF RANOY ALL 


3633 


1246 


SLOWRNi 


ta:; 


ACTOVR 




3631 


3310 




OCA 


AUTO10 
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TAD 


STRRND 
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- 
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3640 


3149 


OCA 


PATMOV 


3641 


1410 


TAJ I 


AUTO10 


3642 
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OCA I 
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3643 
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3646 


3694 


ACTOVRj 


ACGOOV"! 


■at a* 
3647 


1412 


STRRNDi 


RA^DYl"! 


3650 


7760 


MM 2 1 


• 2 J 


3651 


3213 


OVRli 


RE JSER*7 


3652 


3244 


OVR2i 


P I 3SER*5 


3653 


3291 


0VR3 , 


P I 0SER*12 


3654 


3323 


0VR4 1 




3695 


2230 


ACGOOV, 


2230 


3656 


5226 




5226 


3657 


2231 




2231 


3660 


5226 




5226 


3661 


6002 




IQP 


3662 


7240 




CUA CM 


3663 


3231 




3231 


3664 


3230 




3230 


3665 


6272 




CIF 70 


3666 


4632 




4632 


3667 


6001 




I0\ 


3670 


1344 


CONTRDi 


1344 


3671 


5601 




5631 


3672 


0000 







3673 


7777 






3674 


6500 




6520 



3675 


5771 


R9771, 


5771 


3676 


4772 


K4772, 


4772 


367? 


3257 


0P1HND, 


RTCSER*2 


3700 


3701 


DPIOVR, 


0V=!0P1-1 


3701 


1317 


ERRORS i 


ERR03+4 


3702 


0000 


/ 

OVROP1. 





3703 


2331 




2331 


3704 


5720 




5720 


3705 


1332 




1332 


3706 


3331 




3331 


3707 


6272 




CIP 


3710 


4730 




4730 


3711 


5720 




5720 


3712 


6500 




6500 


3713 


7634 




.144 


3714 


7634 




= 144 


3715 


6002 




!OP 


3716 


1333 




1333 


371? 


6272 




CI r 
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2227 


ENOOFP 


3175 


GSVLNK 


2372 


B7 


3543 


COIPAR 


1206 


ERROPH 


2336 


HALT 


1336 
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1366 
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1313 


HCHNG 


2343 
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HGHL I M 


1145 


K5771 


0136 


MIN37 


3135 


OPRSKP 


0131 


MlGHLM 


2374 


K5772 


0137 


HM20 


3650 


OSIMAC 


2173 


HLT 


7402 


K6201 


0756 


MM4 


3023 


OSMLNK 


2174 


HLTFIL 


3466 


K6202 


0757 


MM59 


3077 


OUT 


3271 


HLTOPR 


1741 


K73 


1125 


MM6 


0142 


OVRl 


3651 


HOHCIF 


2744 


K7300 


1644 


MM7 


1545 


0VR2 


3652 


HRERNG 


2344 


K7613 


0132 


MMM55 


3340 


0VR3 


3693 


ICHNG 


2567 


K7700 


2517 


HQVOWN 


3557 


0VR4 


3654 


ILLMO 


1733 


K7721 


1655 


MOVOVR 


0103 


OVRLAY 


0125 


ILL0P1 


1664 


K7773 


0760 


MOVUP 


3225 


0VRLY1 


0127 


ILL0P2 


1672 


K7777 


2624 


MOVWDX 


3573 


3VR0P1 


3702 


INACOV 


3337 


KCHNG 


3146 


MQOAT 


1363 


»ATCM 


0023 


INDAD 


<)750 


KIE 


6035 


MQOATA 


0753 


PATCH1 


0052 


INOMSK 


1133 


KILL 


3101 


MQDMSK 


1141 


PATCW2 


3600 


INITF0 


3507 


KILL IT 


3373 


MQOONE 


2753 


PATCHC 


0102 


INSCNT 


3472 


KJ^S 


0764 


MQL 


7421 


patmov 


0145 


I NSGE'J 


1601 


KK377 


3103 


MR I ERR 


2161 


patmvi 


0146 


IUSMSK 


1642 


KKCDF 


3145 


MRIOVR 


0126 


'CSAVE 


1311 


INSOK 


1520 


KKK4 


3024 


MRIPNT 


1751 


PCTST 


2073 


INSTR 


3746 


KLAS 


0147 


MVWOPG 


3574 


PIOFLG 


3230 


INT 


3003 


KRERNG 


3147 


NEG10 


2072 


PIORBY 


3163 


INTAC 


3141 


LAS 


7604 


NEG14 


1652 


PIOSER 


3237 


INTERS 


3102 


LASCNT 


0143 


NEG20 


2304 


PIOXHT 


3154 


INTLNK 


3142 


LASTAB 


0144 


NEG6 


2460 


POS10 


2250 


INTMQO 


1757 


LCHNG 


3367 


NEWDFA 


0479 


POS230 


2071 


INTOPR 


2175 


lmits 


1522 


NEWDTF 


0457 


POWERF 


3164 


INTRET 


3144 


LINKON 


2791 


NOTAUT 


3611 


POWFAL 


3304 


INTSET 


2137 


LINKRT 


1361 


NOT I NO 


3629 


PRGBG 


1576 


IRERNG 


2570 


Ul\KSV 


1360 


NOTJJ 


3650 


PRGBGN 


3523 


ISZTST 


1234 


LNKSAV 


1174 


06201 


1733 


PRGEMO 


3576 


JCHNG 


2764 


LOC230 


0140 


OADDRS 


1773 


PRGRET 


3376 


JHPJMS 


3665 


L0C231 


0141 


OERROR 


2767 


PRGSlZ 


1592 


JMPTST 


1304 


LOOPID 


0601 


OFIELD 


2176 


OSRERR 


3371 


JMSLOC 


3762 


L03PSW 


1342 


OPl 


3375 


R5771 


3675 


JMSLOO 


3763 


LOWUIM 


0214 


0P1HNQ 


3677 


RANI 


1543 


JMSRET 


0776 


LPSNT 


0292 


0P10VR 


3700 


RAN2 


1544 


JMSTST 


1267 


LPSW0 


2737 


OPlSEL 


0021 


RANCON 


2127 


JRERNG 


2765 


LRERNG 


3370 


0P1SET 


3505 


Random 


3341 


Kl 


2061 


M13 


0503 


0P2SEL 


0022 


RANDY 


1401 


K10 


3501 


MIS 


2536 


0PERR1 


1734 


RANDY1 


1413 


K100 


2067 


M14 


2424 


OPRAND 


3152 


RANFLD 


0754 


K14 


2064 


H1777 


2569 


OPRBGN 


1656 


RANNi 


3395 


K177 


1646 


M23 


0902 


OPRCOM 


2706 


RANN2 


3396 


K2 


2062 


M200 


0251 


0PRER1 


2376 


RDYPIO 


3294 


K20 


2065 


M430 


0219 


OPRERR 


2744 


RECFLG 


3227 


K200 


3473 


M5 


0133 


OPRETF 


2792 


RECPlO 


3235 


K37 


1546 


M63 


2305 


OPRHLT 


2364 


RECSER 


3204 


K4 


2063 


M6Z03 


1645 


OPRINT 


0637 


RECSLU 


3233 


K40 


2066 


M7 


3471 


OPROVR 


0130 


REFAO 


0747 


K400 


0290 


^AXFLO 


0573 


OPRPNT 


1792 


RELGO 


3374 


K4000 


2434 


MDTHSK 


1135 


OPRRET 


2675 


RESCNT 


3435 


K4772 


3676 


MEMOAT 


1029 


OPRSET 


2094 


reset 
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U L T T 


0360 


XMODMS 


3542 


retfld 


032 5 




2201 




WA I TEN 


3397 


XMTFLG 


3226 


RETHR 


0504 


S I MR AL 


246l 




XACDM3 


3540 


XMTPjO 


3234 


RETPNT 


0004 


S I MR AR 


2442 




XACS 1 M 


2352 S 


XMTSER 


3201 


RETPRG 


3133 


SI MRTL, 


2537 




XADD1 


ol / 


xhtslu 


3232 


RETTDP 


2705 


S I MR TR 


2520 




XADRMS 


3530 


xntind 


0363 


RETURN 


1354 


S J MSMA 


2611 




XASAVA 


0364 


XpCSAV 


2155 


RMF 


6244 


simsnl 


2626 




XASAV8. 


0365 


XRANCN 


3510 


ROLS AK 


0401 


si mswp 


2652 




XBGCON 


0372 


XREFAO 


0366 


rolflg 


2574 


SI MS2A 


2601 




X8GRAN 


0371 


XRETFL 


1373 


ROLLUP 


0320 


SI MTWC 


2042 




XBNQCN 


1160 


XRETHR 


1165 


RSONT 


0376 


S I 2PRG 


3575 




X8S AVA 


1396 


XRET?C 


2196 


R S ON T X 


0370 


SKPFuG 


225i 




XCHNGE 


0592 


XRNFLD 


1364 


R tcflg 


3231 


CI ^ U DM 


3633 




u"i QUO 


2362 


XR0L9K 
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R r C 3 E H 
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SU JXMT 
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v flu a p n 


3541 


XRSCNT 


3544 
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n 1 F 


Iff? f C 
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3531 


XRTOPF 


1774 


RTFLGF 


0574 


SN L.CHK 
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XCNFLP 


3527 


XSIMAC 


1763 
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0571 


SPL 
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XCNFLG 


3190 


XSIMHQ 


1766 


RTL I NK 


3557 


in 3ft V 
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3535 


XSIZE 


0575 


RTMOD 


3556 


START 


1756 




XCNIN3 


3533 


XSHACU 


2361 


5 AHEl 


1463 


ST ARTP 


3424 




XCNMDT 


3537 


XSM83W 


2170 


S AME2 


1473 


STRFLD 
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XCNMQD 


3543 


XSMCAM 


2360 


o m/rflu 

o A VLo W 


1564 


C T P. R m n 


3647 




XCNT 


0271 


XSMCLA 


2357 


SAVLNK 


3795 


SU3A0D 


0212 




XCNTR3 


3522 


XSMCHA 


2163 


SAVSWR 


.?336 


SW API 


0216 




XDATAH 


1762 


XSHCML 


2164 


S8E 


6101 


SW AP2 


3550 




XDRFlG 


352B 


XSMIAC 


2165 


SEUOPi 


3034 


SW AP3N 


0422 




XENDPR 
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XSMLUK 
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0415 
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XSHMQA 
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1772 


SERRTC 
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XEXPRT 
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Xr DMoK 


3526 


XSMCP1 


1770 


SETCON 


3401 


SWRS AV 


1351 




XFIELO 


2775 


XSM0P2 


1771 


5ETFLG 


'i 7 7 


SZ ACHK 


2211 




XF I LL 


3514 


XSMRAL 


2167 


S E T I N T 


?357 


3 z P R G 


0245 




XFLD 


0356 


XSMRAR 


2166 


SETOPi 


3035 


TA3LAS 


0150 




XFLDFG 


3521 


XSMRTU 


2172 


SETRET 


0710 


TA3LE 


3525 




XFLDLH 


1573 


XSMRTR 


2171 


SETSKP 


2226 


TADTST 


1223 




XFLRND 


3515 


XSMSHA 


2346 


SFLDFG 


ii'433 


TEMP 


3025 




XGENT I 


1155 


XSKSNL 


2350 


SIMAC 


2755 


TI ST 


2143 




XGETWQ 


1357 


XSMSWP 


2356 


SI M ACL 


2666 


TS AME 


1503 




XGNf"|_D 


3524 


XSMSZA 


2347 


S I MBS W 


2477 


TS"LDF 


2572 




XGO 


0576 


XSTF'uO 


0554 


S I M C A M 
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TS T 1 Nl 
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XHALT 
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XSVLNK 
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S I HCL A 


2661 
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X I NDMS 


3534 


XSWAP1 


3516 
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T S T I 


0564 
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XSWAP2 
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XUPERL 
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S I M I AC 
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XWDMOV 
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SIMLNK 
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XXCNT 
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SIMMQ 


2757 


TSdPDN 


2573 




XLIM1T 
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YHALT 
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SIMMQA 
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3547 
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Z130 
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SIMMQl 
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2571 




XLWLIM 


0570 


H20 
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SIMMQL 


2640 


UP3UXH 
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XMDTMS 


3536 


Z233 


2246 
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2323 2247 

240 2244 

HASAVA 1370 

2ASAVB 1371 

2BSAVA 1570 

ZCNFlG 2152 

ZCNT 3775 

2EXPRT 2391 

ZFILL 3174 

ZFIND 2774 

ZFLDLM 3511 

ZGETMO 0773 

ZHIGH 3513 

ZINOAD 1571 

ZINSTR 1566 

ZJMSRT 1753 

ZLIMIT 3555 

ZSETOP 2353 

ZUPLIM 3512 
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